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That's why Apples and Ataris are saying: 

"Talk Is Cheap" 



ITS CALLED 

THE SOFTVWRE AUTOMATIC MOUTH, 

S.A.M. FOR SHORT 

Its a high quality speech synthesizer 
created entirely m software You use it 
as a software utility, toad it into RAM. 
and then use your machine as usual, 
except now you can make your pro- 
grams talk. It generates the speech 
sounds on demand, so there is no limit 
to what il can say 

When you hear SA.M., you'll prob- 
ably agree thai II sounds better than all 
the hardware speech synthesizers lor 
Apple or Atari computers And, it has a 
truly remarkable price 

YOU CONTHOL INFLECTION, 
PITCH AND SPEED 
With Its user-vanable inlleclion, S.A.M. 
can acceni words on Ihe nghl syllable 
and emphasize the important words in 
a sentence 

You can also make S A. Ms speech 
higher or lower, and faster or slower, 
over a wide range ot settings 



USE EASY PHONETIC INPUT 
OR PLAIN ENGLISH TEXT 
S-A-M- understanrJs a simpte phonetic 
spelling syslem. not a mysterious 
alpha-numenc code, S.A M. helps you 
learn phonetic spelling by showing you 
your mistakes, and the owners manual 
gets you started with an English-io- 
phonetics dictionary ol 1500 words So 
Its easy to make SAM. produce 
exactly the sounds you ^^^ . 

want. ^^ J 

But suppose you ^S m 

want to lype ordinary ^^' 

English, or you want te»,^r.i'.n 
your machine to read a 
word processor file 
aloud. The SAM 
disk comes with RECI- 
TER, an English text- 
lo-speech conversion 
program thai lets 
S.A.M. speak from 
plain English text. 



SAM 



ADD SPEECH TO YOUR PROGRAMS 
WITH EASE 

In a BASIC program, you add speech 
with |ust a couple of commands. In a 
machine language program, iis jusi as 
easy SAM. comes with four demon- 
stration programs to show off ils dis- 
tinctive leaiures and help to write your 
own talking programs Write adventure 
games with talking characters, educa- 

Mtional programs that 
explain aloud, or 
utilities with spoken 
■ prompts - put your 

imagination to work. 



You cart order 
S.A M directly from 
DON T ASK Add 
$2,00 for shipping and 

ihandling to your check 
or money order (or 

lOfderC.O.D.) 




SA.M ptporammM} by Mllfh B»r< 



S.A.M. for the Apple 11^11+ 

Includes an 8-bit digital-to-analog con- 

verier and audio amplifier on a board 

Only S124.9S 

Requires48K. disk- (S.A.M, takes up to 

9K: RECITER 6K,) Yoo will also need 

a speaker, 

S.A.M. for the Atari 400600 

S.A,M talks through your television 

speaker. No additional hardware is 

required- Only $59.95 

Requires 32K, disk, (S.A,M. lakes up 

9K: RECITER 6K.) Note: to produce 

the highest quality speech. S.AM, 

automatically blanks the screen during 

vocal output- the display is preserved- 

S,A,IW- can talk with the screen on, but 

the speech quality is reduced. 



KDnTASKl 

I COMPUTER SOFTWARE I 



2266 westwooa Bouievaid Suile B-150 

Los Angelos, Calilomia 90064 

Telephone (213) 397-8811 



Hear S.A.M. at your favorite computer store today! 
Dealer Inquiries welcome. 
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V3IF0HTH for Atari' 400/800 
Professional Software for the Hobbyist 



IINITERIMATIOIMAIJ 



FORTH has been used for years by ATARI' and others in programming their arcade games. FORTH is fast, 1 5- 20 
times faster than BASIC, and can make use of every capability for your computer. And its no longer the province^ 
of the professional programmer! With valFORTH and the additional packages described below, you can 
create programs in an afternoon that would previously have taken weeks of hard work! ^ 

WHAT? YOU DONT ALREADY KNOW FORTH? "^-Z, 

Then take advantage o( our special offer on Starting Forth by Leo Brodie. Widely acclaimed as the best ' I^ 
book available on the subject, this entertaining treatment of Forth will make you comfortable with this v>~~ 
exciting language quickly and easily. When you order Starting Forth, you get a free copy of our "Notes 
for the valFORTH User. " including references, by page, to Starting Forth. 



These are the utilities developed by Valpar tnternalional's software 
specialists and used to create our commercial software products. 
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NEW! By Popular Demand! 



valDOS Now you can use your valFORTH system to read and write 
normal Atari DOS Files created with valDOS or other sources. Also in- 
cludes valOOS File Editor lor creating and reading FORTH Source 
Code without "screens." (Not a general file editor.) 

(Over 25 pages of documentation. Requires valFORTH.) 



valFORTH, 



Package contains: fig-FORTH kernel with mathematical and stack op- 
erations machine-coded for higher speed than normal lig-FORTH; line 
editor AND screen editor, debugger, sound and graphics commands, 
floating point, advanced 6502 assembler, diskcopiers, and much mor^t 
(Over 1 1 pages of documentation) 




UTiLJTJES flfi^ 
INDED EDJiaO 



utilities: 4 array types. 4 case types, text on graphk:s 8. extensive string 
manipulation and keylxjard input. STICK & PADDLE, randoms, bit 
manipulation, and mucli, much more. 

Editor: fast, powerful, complete valFORTH screen editor 1 .1. A profes- 
sional-quality tool that makes editing a pleasure. 
(Over 60 pages of documentation. Requires valFORTH.) 






Player-l^issile: Create, move, color, change ^^^^H and bound 
players and missiles with high level commanilHi^Hpporl of 5th 
player, multicolor players, etc. etc. Alt critical sections in machine code. 
Character Editor: Compose character sets with joystick. Simultaneous 
display o1 created characters. Make images for players and missiles. 
Sound Editor : Simple independent control of all four voices (one joystick 
per voice) and audio-control register. Create any single-setting sound 
with graphical and tabular readout. 

(Over 35 pages of documentation. Requires valFORTH.) 



VALPAR INTERIMATIONAL 

aeOI E. 3fl»" STREET 
TUCSON, ARIZONA aSTTS 

Call Toll-Free 800-528.7070 In Arizona call (602) 790-7141 




Coming Attractions: 



* TARGET COIVIPILER 

* 3D WORLD 



For more information fast and a |4TH ^ IF HONK THEN | 
bumpersticker. send 25« and a self-addressed, stamped envelope 

DISPLAY FORMATTER 

Fast, simple creation of all types of display lists, with automatic 4K 
fjoundary jumping. Automatic or user controlled memory allocation, and 
formatting for horizontal and vertical scrolling, and display list interrupts. 



|T<I^N¥«.li « 
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n GT(A and •'7-I-". Draw and fill 
v^.. ...»..»> .»».», «..».»..».», M.«iBasic. Tum-toward* tor 'chasing" 
and vanishing point effects; point labeling, etc. Also SIN, COS, ATN, 
ATN2, etc. added to floating point. 
(Over 35 pages of documentation. Requires valFORTH.) 

Text Compression and Aoto Text Formattioo 

A unique, two-part utility! 

• Text Compression allows the packing of text into much less space 
than normally required. Useful for wordy Adventure games, "artificial 

Eslllgence.'etc! 
to Text Formatting takes both normal and compressed text and 
lies it to the video screen "windows." 
r 20 pages of documentation. Requires valFORTH.) 



valFORTH alone requires 24K 

valFORTH plus one Or more packages requires 32K minimum 

Memory requirements include 10-12K working space 

All products are now on non-protected disks 

Over 350 pages of detailed documenlalion! 



valFORTH 

General Utilities and Video Editor 

Player Missile Graphics. Character Editor, and 

Sound Editor 
Display Formatter 

Turtle and valGraphics and Floating Point Routines 
Text Compression and Auto Text Formatting 
valDOS and valDOS File Editor 
Heavy-Duty Professional Binder (provided free when 

ordering 3 or more packages at one lime) 
Starling Forth 



40 00 

35.00 
45.00 
35.00 
45.00 



Prirwipal Software Authors: Stephen Maguire and Evan Rosen 

Atan 1& A iradumant ol Mart, inc . a dmvon of WAiner Commumcaiicm;^ 



Pius Shipping and Handling 
VISA and MASTERCARD accepted 
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Alternatives to BASIC 
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MUNCHKIN ATTACK by David N. Plotkin 
Avoid the hungry creatures determined to gobble you up, 
as you try to devour a yellow dot. Will you be able to turn 
the tables on your pursuers? 
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Are you the pursuer or the pursued? You're never sure 
when the computer is going to turn the tables on you in 
this adaptation of a popular children's game. 
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GREAT INNOVATORS 




In the 15th century, life was simple, but to the genius of 
Leonardo Da Vinci many problems needed answers. He was 
a constant Influence in many areas: Art, Science, Math, 
Astronomy, Physics, Architecture, Engineering and Anat- 
omy. In all of his studies he accomplished great things. 
These drawings are typical of Leonardo's genius. 

Vista Computer strives to answer the complex problems of 
today's computer high technology. Vista excells in many 
areas also: Apple® Disk Storage, Apple® Drive Subsystems, 
Vision Series Video Cards, IBM™ Memories and IBM^" I/O. 

Vista sees the continuing need for advancement in all these 
areas and are constantly expanding the product line to 
meet tomorrow's computer needs. 




Listed below are products currently manufactured by Vista: 
• VIOOODual 8" Disk Drives • VllOO Dual Thinline 8" Disk 
Drives • VI 200 6MB Cartridge Drive • Solo 5 'A" 35 Track 
Disk Drive single sided full height • Duet 5'A" 40 Track Disk 
Drive double sided half-height • Quartet 5'A" Dual double 
sided Disk Drive in side-by-side chassis • A800 DMA Double 
Density Disk Controller for 8" Disk Drives • Apple ilF" Time 
Card • Keyboard Buffer • QB75 Interface • Vision 80 80 x 24 
Card • Vision 40 Softscreen Interface • Vision 20 Character 
Qenerator • IBM® 576K Maxicard • PC Master • PC Extender • 
PC Extender Plus • PC Expander • PC Expander Pius • IBM® 
Multicard. 

Continue to watch Vista Computer Co., Inc., as their line ex- 
pands to meet all your future computer needs. 

Contact Your Local Vista Dealer or Call our Vista tlottines. 



Vista 



COMPUTER 
COMPANY INC. 



1317 East Edinger / Santa Ana, CA 92705 
(714) 953-0523 / (800) 854-8017 
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Apple II \% 3 registered tradcmdrk of Apple Computer Co. 



DISTRIBUTORS 

Western Ortiiip 3 Wholesale 

(2131 973-7SA4 l*OBl 7321307 

Soutli Central ■ fl.F. Systems 

1214)585-8885 

UK tial Computers Ltd. 

(02S2( 517175 / TWX: 858404 
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The Information Utility 

by Randal L. Kottwitz 



"My phone's quit working. " 

"The water main broke last week 
and I'm still driving to my mother's to 
go to the bathroom. " 

"That electrical storm knocked out 
our power for three days!" 

How many of the above statements 
have described your predicament at 
one time or another? Very few of us 
manage to make it through this life 
without having to face the lack of 
"vital" services at one time or another. 
Sometimes we are just as glad to leave 
them behind for "the peace of the 
country," but most of the time we con- 
sider them necessary to even the 
simplest of lifestyles. It's not easy to 
consider how we might change our 
lives should running water, electric 
power and/or the telephone be per- 
manently removed from them. 

A new utility is fast forming on 
which we may soon be equally depen- 
dent. At an ever increasing rate, the 
stream of information entering and 
leaving our homes is becoming an 
assumed luxury. We rely on the 
weather report to tell us how to dress, 
we telephone orders for merchandise to 
be delivered to our door, answering 
machines click on and off in our 
absence, informing inquirers of our 
whereabouts and collecting their 
messages for later digestion. Most 
cable companies offer immediate 
reports from one of the major news 
wire services and banking from home is 
an available reality in several major 
cities. No one has all of these inputs 
influencing their lives, but most of us 
have enough to keep us thoroughly 
occupied. 

All of these streams of information 
are converging into a central tech- 
nology I call "the information utility." 
You can answer your telephone 
through your television, access a wide 
realm of services through a modem and 



a computer, and interactive cable ser- 
vices are slowly but surely penetrating 
the nation. Our life revolves more and 
more around the screen of our televi- 
sion set. The ramifications of all of this 
are essentially very good — the more 
we communicate with each other, the 
better we will understand each other, 
and the closer we will come to world 
peace and understanding. 

However, we must prepare to answer 
some serious questions as we become 
dependent on this new utility. Will 
communities control the information 
banks accessed by their citizens, or will 
it be the county, state or country? Cen- 
sorship has reared its ugly head again 
recently as book burnings and porno- 
graphy issues have garnered headlines. 
Will influential groups try to seize con- 
trol of our new utility, telling us what 
we should or should not know? The 
issue of right to know versus need to 
know will become more serious as we 
are given the means to search out 
whatever information we might want. 

What about the economic ramifica- 
tions of our new utility? Will the line 
between the haves and have-nots 
become more evident as those who can 
afford it gain access to data which will 
make their decisions more profitable 
and beneficial? What will be the effects 
on our banking system? First impres- 
sions would have you believe that only 
the physical building of the bank will 
change as we operate from our home 
terminals. However, the changes in the 
way we receive credit and make pur- 
chases will reach deeply into the bank- 
ing system as well. Suppose you re- 
ceived a line of credit based on the 
value of your home and car, against 
which you could charge purchases of 
goods and services — much the way 
you charge against your credit cards 
now. Credit cards have gotten many 
people in "over their heads" as they've 
learned that credit is not easy to 
manage. What if these same people 
SoftSide 



could keep charging until they spent 
away their home and transportation? 

As with any utility, the question of 
service will arise. If we become depen- 
dent on our home terminals to educate 
our children, conduct our personal 
financial affairs, and even to perform 
our duties to the workplace, what will 
be the effects of a failure in the sup- 
porting system? I recently had my 
phone go out of service for a full week. 
As a result, I made many trips to a 
local shopping center to use a pay 
phone to conduct necessary business. I 
have learned to depend on the 
telephone to conduct many areas of my 
life. As we learn to depend on our "in- 
formation utility" to provide vital sup- 
port services, what will be our backup 
system should the utility fail to 
operate? 

I've asked many questions here and 
not given any answers — intentionally. 
These issues and many more like them 
have no definitive answers at this time. 
However, they are serious topics which 
we must address as we face the near in- 
evitability of the "information 
utility." It's easy to paint a rosy pic- 
ture of the technological society of the 
future. However, we must recognize 
that every change we make in our lives 
affects even more changes in the 
future. We, as a society, have had a 
tendency to implement technological 
advancement without always consider- 
ing the far reaching ramifications. 
We've learned some important lessons 
from our mistakes. Now, as we look 
forward to the information-rich 
culture of the future, let's consider 
those lessons of the past and do our 
best to speculate and plan for the long 
term effects of the changes we must 
make. ^-^ © 




Randal L. Kottwitz 
Editor-in-Chief 
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ZBASIC 2.0 

Dear SoftSide, 

I am very interested in obtaining a copy 
of the ZBASIC 2.0 compiler which was 
reviewed in Issue 31.1 have not been able to 
locate a local dealer who is able or willing to 
supply this item. Will you please publish the 
mailing address for Simutek, Inc.? 

Darrell Rose 
Pacific Palisades, CA 

Editor's Reply: Our regrets for not 
publishing the address with the review of 
ZBASIC 2.0. For your information: 

Simutek Computer Products, Inc. 
4877 East Speedway 
Tuscon, AZ 85712 



ATARI® DISKS AND 

ENVYRN™ 

Dear SoftSide, 

I have been a faithful reader of your 
magazine for over two years. You will be 
happy to know that I am using your 
Database, with some minor modifications, 
published in the December, 1981 issue, to 
help run a Union representing 1500 people. 
I have found your Atari® programs to be of 
excellent quality. 

Now come the complaints. First, the mat- 
ter of tape vs. disk. There are far more 
cassette users than disk users, although that 
may not always be the case. I am disap- 
pointed when programs that require a disk 
drive are placed in the regular ATARI/ 
SIDE. I feel that if a disk is required it is a 
program more suitable for the DV version 
than ATARI/SIDE. 

The second problem was the announce- 
ment that Envyrn™^ would be published in 
Atari Microsoft BASIC rather than Atari 
8K BASIC. Even if it significantly delays 
publication, I beg you to reconsider your 
decision. On checking informally with 
members of our users group in the 
Cleveland area, I found only two who had 
Atari Microsoft BASIC, and only three 
who were considering buying it. Several 
were considering BASIC A -I- , which, as 
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you know, is upward compatible with Atari 
8K BASIC. I talked with about 35 people 
and believe my findings are significant. The 
Envyrn program is, I believe, the most im- 
portant you have ever published. The 
thought of it being available to only a hand- 
ful is very distressing. To be perfectly 
honest, the thought of typing it in, 
translating it to 8K BASIC, and having no 
way of checking it against a listing or 
SWATting it is sufficiently intimidating 
that I probably will not attempt it. Atari 
Microsoft BASIC is a very major product, 
but not in wide enough use to warrant its 
use in your publication. Please reconsider 
and publish Envyrn in 8K BASIC, or at 
least provide a companion translation and 
SFK.4r table. 

Even if you don't follow my suggestions, 
I'll keep plunking down my three dollars. 

Ronald M. Hopkins-Lutz 
Cleveland Heights, OH 



Editor's Reply: In our recent survey of 
SoftSide readers, we discovered that more 
than 50% of Atari owners surveyed owned 
a disk based system. Obviously, not all of 
those people subscribe to DV. Therefore, 
we try to offer programs for both disk and 
tape system owners in every issue of Soft- 
Side. As for the problem with Microsoft 
BASIC, the facts are not yet in. We have 
had a large response to our request for 
owners of Microsoft BASIC to inform us of 
their purchase. However, it has not been 
substantial enough to justify changing our 
standard throughout the magazine. We are 
currently investigating publishing Envyrn in 
Atari 8K BASIC and are encouraged at the 
possibilities. We hope to be able to fulfill 
your request. 



DISK QUALITY 

Dear SoftSide, 

In Issue 33, you mentioned that you had 
discovered that some of the disks you were 
using had limited powers of data retention. 
As a mass user of disks, it would be a real 
service to your readers if you were to share 
your experiences with various brands with 
us. 
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Of course, names are essential, and 
perhaps some toes will be trod on. 
However, this would be golden information 
for someone who uses only a couple of 
dozen new disks per year. With this infor- 
mation, we could evaluate what we are get- 
ting for our money and make some edu- 
cated comparisons. Maybe some trade-offs 
are acceptable, but it would be nice to know 
what they are. 

Ken Green 
Fort Lauderdale, FL 



Editor's Reply: Consistency in disk quality 
is a problem plaguing the computer in- 
dustry. Over the years, several companies 
have gained recognition for quality disks, 
only to have a bad batch reach the 
marketplace and their reputation come into 
question. Due to this inconsistency, the best 
thing we can recommend is that you always 
purchase disks with a warranty, always 
keep backups, and don't hesitate to return 
disks to the manufacturer if you have a 
failure. The company which duplicates 
SoftSide DVis constantly running tests on 
media from different manufacturers in 
order to maintain quality control. 
However, the results on any one manufac- 
turer vary from batch to batch and an at- 
tempt to give you a comprehensive analysis 
of disk quality could only hold true for the 
disks we tested — not for any future 
releases from the same manufacturers. 



"A CAUSE WITHOUT A 
REBEL" 

Dear SoftSide, 

In your editorial, "A Cause Without a 
Rebel," you state that it's time to form an 
organization as extensive as the PBS to 
steer the production and application of 
software for national education. I would 
like to join you in your call for action. I 
plan to meet with a vice-president of PBS in 
Stowe in the near future, and we will cer- 
tainly discuss this need. In addition, my 
work with the State Department of Educa- 
tion in Vermont, both as a resource agent 

continued on page 8 



Integrated, Menu-Driven File 
And Information System for 
Home or Office*... with PCHMS™ 

our Personal Computer Home/Office Management System. 



Instantly put your IBM PC to work! PCHMS is 
a filing and information system that manages 
all those detaDs that make your office, home and 
personal life smooth and efficient. Organize per- 
sonal, household and business details— names and 
addresses, phone numbers, credit cards, home 
inventory, zip codes, medical and dental records, 
insurance policies, recipes, expense accounts, 
shopping and other lists, area codes, maintenance 
records and more. 

•Note: Over half of our users have PCHMS™ in the office. 





PCHMS is an integrated menu-driven sys- 
tem that allows you to add, delete, modify, or 
print out records in any file by fuD or partial 
key search. And you can create 10 full-fea- 
ture user-defined files for anything you can 
think of. PCHMS provides all this plus a let- 
ter/memo-writer, built in printing calculator, 
20 year calendar, constant display of date and 
time, alarm timer, worldwide time conver- 
sion, and metric/English converter. PCHMS 
files may be individually password protected. • 
PCHMS runs in both monochrome and color. ~' 

And . . . that's not all . . . 
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PCHMS™ runs on an IBM Personal Computer with 64K of 
memory, at least one disk drive (single or double sided). 
Printer optional. PCHMS Auto-Dialer requires a Hayes Stack 
Smartmodem and RS232 card. 

;/^k for PCHMS™ and PCHMS Auto-Dialer" at your IBM PC 
dealer or order directly from Arlington Software + Systems. 
NOW AVAILABLE AT COMPUTERLAND STORES. 

PCHMS and PCHMS Auto-Dialer are trademarks of 
Arlington Software + Systems, The Hayes Stack Smartmo- 
dem is a trademark of Hayes Microcomputer Products, Inc. 
IBM is a trademark of International Business Machines. 

Dealer inquires invited. 



, You can add the PCHMS Auto-Dialer™. 
^ Automatically dial any stored phone number 
T^-in your file with the press of a single key. 
Auto-Dialer gets you local, long distance, and 
international phone numbers, as well as net- 
works such as Sprint and MCI. 
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Wani 4iiure? Add UieppHMS Mailing List 
I MaSule, the PCHMS Electronic Mail 
System^ and the PCHMS Budgeting and 
Horne-^Si^ance System. 



PCHMS software is supplied on single sided diskettes together with 
comprehensive user documentation, backup utility and configuration 
program. Satisfaction Guaranteed! 

D please send me PCHMS @ $89.95 

n please send me PCHMS Auto-Dial @ $69.95 

n please send me PCHMS Mailing List @ $59.95 

Shipping and handling $ 3.50 

MasterCard and Visa welcome, please add 4% 

Name: 

Address: 

City: 



State: 



Phone: ( 

Charge Card # 
Signature; 



Zip: 

Card Exp. Date: 



97 Bartlett Ave Arlington. MA 02174 
(617) 641-0290 



Softivare+SKStems 




Input/Output 



SUBSCRIBE 
TO SUCCESS 

EFERENCE, the 
only business 
journal for the 
IBM Personal 
Computer. 

Are you in business? 
Read REFERENCE to imd 

out how you can utilize the 
IBM Personal Computer 
in your business. 

Yes, I want to subscribe to 
REFERENCE Magazine for 1 
year (6 issues) for only $18.00! 
PLEASE PRINT 



Personal Check Enclosed 
Money Order Enclosed 
MasterCard 
Visa 



Card# 


Exp. Interbank # 


Signature 
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P.O. Box 1200, Dept. 
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(603) 673-9544 
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continued from page 6 

and as a founding director of the state's 
educational computer users group, gives me 
a chance to share ideas with a great number 
of people. 

The great challenge for education (when 
and if the educational establishment takes 
on the task of retooling itself for the age of 
information) will be not only to provide 
needed services and training, but also to 
provide the leadership in setting the tone 
and philosophy of the new age. Learning is 
being redefined in terms of the process of 
the creative imagination, instead of the 
traditional notion of the acquisition of 
skills and information. In the future learn- 
ing society, the acquisition of knowledge 
will be secondary to the communication of 
ideas. 

Our focus should therefore be on 
developing self-directed learners who are at 
home with creative initiation of quests for 
knowledge. The new tools of education can 
extend our capacity for learning as much as 
the invention of writing did for our 
ancestors, or they can be used to deliver 
education as usual. Much depends on our 
diligence in guiding the growth of the in- 
tegration of the new technology into the 
educational system. 

I'll look forward to helping you, in 
whatever way I can, to influence the 
development of the future of advanced 
technologies in the nation's education. 

David Gibson 
Stowe, VT 



Editor's Reply: Thanks for your support. 
The issue of computer awareness in educa- 
tion holds an ongoing interest for SoftSide. 
Watch future issues for reports on 
developments in this area. 



MORE GAMES 

Dear SoftSide, 

After reading SoftSide 33, 1 had only one 
thing to say: Aaaaaaaaaahhhhhhhhh!!!! 
!!!! Only ONE game for the Apple™, only 
one for Atari® (DV!!), and none for the 
TRS-80®!!!! Please, don't let us down. 
Please publish more games. My fingers 
need practice, and my brain-juice doesn't 
run anymore! 

Keep up the great work, and thank you 
for reading. 

Leonard Vincent 
West Hollywood, CA 

Editor's Reply: SoftSide continues its com- 
mitment to entertainment software for 
microcomputers. However, we feel that the 
home computerist's interests reach far 
l>eyond games and we are shaping our 
editorial content to serve as many of those 
interests as possible. 

SoftSide 



OUTPUT 

by Randal L. Kottwitz 



I hope you have a comfortable chair 
and warm fire to accompany your 
reading of this issue of SoftSide. 
(Sorry, all you people in arid climates 
— it's January, and in New England 
that means cold.) We've packed our 
pages with a lot of heavy reading to 
pass those winter days. Curl up and 
enjoy. 

It's a new year, and we'd like to sug- 
gest a New Year's resolution. Please 
resolve that the next time you think of 
something you'd like to say to SoftSide 
or its readers, you'll go to your word 
processor and write us a letter. Some of 
the best things published in SoftSide 
have originated as suggestions from 
our readers. In a few cases, the person 
who wrote the letter actually got in- 
volved in carrying out the idea. But, 
most times he's provided the kernel of 
a much larger project we've been able 
to carry out through our network of 
programmers and authors. 

We'd like to offer a word of caution 
about programs published in SoftSide. 
We've received several disturbing 
phone calls indicating that some of the 
programs we publish are being made 
available by users groups and bulletin 
boards. In some cases, members of 
these organizations have called, re- 
questing permission to distribute our 
software in this manner. Our answer is 
always the same — all of the material 
pubhshed in SoftSide is copyrighted, 
by SoftSide and its authors. We are 
able to provide the software very inex- 
pensively through our monthly distri- 
bution process, but it does not become 
public domain when we put it in print, 
just as the material in a book doesn't 
become pubhc domain when it's pub- 
lished. In the same manner, the lack of 
copy protection on the vast majority of 
our tapes and disks does not imply that 
we wish to give away the software they 
contain. We believe that, whenever 
possible, the user should be able to 
make backup copies to insure long life 
for our programs. Please resist the urge 
to give our software away. It is the 
means by which we and the authors 
who write for us make our livings. 

So much for messages from the inner 
chambers of SoftSide. We wish you the 
happiest of New Years and, as usual, 
Happy Hacking! © 
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At last, Microbyte has created the perfect storage unit for 

the Apple II. This new data drive slimline out per- 

^- forms any ol Its competition. This pint-size 

drive, works 8 times faster than most other 

; drives, saving you space and time. 

Compare the features of the new ASAP 

' slimline to what you're using now. 

v- We're sure you'll agree, this 

' slimline out performs 

the others. 



8 times faster tfian APPLE II Drives. 

Direct drive motor of extremely 
tiigii quality. 

Only Vz the size of a regular drive. 

100% APPLE' compatible (includ- 
ing "half track "J. 

Can t}e used with IBM PC'and 
other computers by simply dis- 
connecting Interface Board. 

Mechanism and read - write elect- 
ronics made by TEAC the world 
leader in Audio recording 
machines. 




• 1 (one) full year warranty at no 
extra costflll! 

• The SLIMLINE is a 35/40 track 
drive and can take advantage of our 
ENHANCER Diskette which will 
give the user 15% more storage 
capacity & up to 163K Bytes. 

• Slimline Vz height 163K. 

• Dual Slimline drives V; height in 
one box. 

• Slimline ■/; height (1) Megabyte 
with controller. 

Contact your local dealer tor more information. 
Dealer inquiries invited. 




>l1ICROBYTE 

1198 E. Willow, Signal Hill, CA 90806 

Call Toll Free |800| 421-7701 

In California |2!3| 595-6431 

or (714) 691-2663 




FOR YOUNG CHILDREN 

Nine educational and entertaining 
games controlled by a single pro- 
grann. Even very young ctilldren can 
select a game, play It, and select a 
different game.. .ALL BY THEMSELVESI 

. PICTURE MENU GIVES CHILDREN 
CONTROL 

• MATCH NUMBERS AND LETTERS 

• COUNT COLORFUL BLOCKS 

• ADD AND SUBTRACT STACKS OF 
BLOCKS 

• LEARN THE ALPHABET 

• PRACTICE SPELLING NAMES 

• COMPARE SHAPES 

• DRAW AND SAVE COLORFUL PIC- 
TURES 

The large numbers and letters fill the 
screen with color. Children enter 
single key stroke responses and get 
immediate visual and musical feed- 
back. Hints are provided when ap- 
propriate. Beyond just teaching 
children basic skills, EARLY GAMES 
makes them feel comfortable as they 
control the computer. Designed for 
children ages ZVi to 6 years old. 

EARLY GAMES offers the child a 
diverse selection of activities which 
stimulate the process of problem 
solving as well as fostei' Individual 
creativity. 

Pamela Bach, Director 
Youth World Day Care Center 

I took EARLY GAMES home for my kids 
and they really liked it! It held their at- 
tention and they learned from it! 

Jeanette Fritze 
Computer Saleswoman 

EARLY GAMES can help children 
learn new concepts. Information, 
and skills and also introduce them to 
the joys and benefits of home com- 
puters. 

Peter Clark, faculty 

Institute of Child Development 

University of Minnesota 

All nine games for S29.95 

(Minnesota residents add 5% sales tax) 

Apple II Plus 

IBM Personal Computer 

Atari 24K Disk or 16K Cassette 

TRS-80 Model l/lll 32K Disk or 16K Cassette 

TRS-80 Color Computer 16K Disk or Cassette 




VISAIMasterCard 



EARLY GAMES 

educational software 

Suite 1400 

Shelord Plaza North 

Minneapolis, MN 55426 

1-800-328-1223 

Minnesota residents call: 
612-544-4720 
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HINTS & ENHANCEMENTS 




Atari® Solitaire Enhancement 

I would like to thank Mr. David Pleacher 
for his enhancements to Apple^*** Solitaire 
(original program. May, 1982; Apple 
enhancements, Issue 33). I had to make a 
few changes to convert it for my Atari. The 
following lines work well for me. 

1420 60SUB liOO:? "ARE YGU READV FOR H 

Y COHflENTS? (V/Nj";:6ET U.k 

1430 IF A089 THEN 60BUB 1460:8010 133 



1433 FOR Q=0 TO s:G7=Q7+IN(Q):NEn Q 

1434 FOR Q=l TO 4:Q7=07+F(Qi:NEn fi 

1435 60SUB liOO:'' "YOU WERE ABLE TO PL 
AY "jQ/;" CARDS,":' " ";:GOSUB 1615 

1436 IF 07)45 THEN 60SUB 1600:? "YOU A 
LHOST MADE IT"|";:60SUB 1615 

1437 IF Q7>30 AND Q7<46 THEN 60SUB 160 
0:? "EEELLEHT WORK '" ; : 60SUB 1615 

1438 IF 07)20 AND e7<31 THEN 60SUB 160 
0:? "THAT IS ONLY AN AVERABE 6AHE.";:8 
OSUB 1615 

1439 IF Q7<21 THEN GOSUB 1600:') "DO YD 
U mm HOW TO play this 6Ar!E?";:60SUB 
1615 

1440 SOSUB 1600:' "WOULD YOU LIKE TO P 
LAY ABAIN") \Y/N)"; 

1448 GET II, A: IF A078 THEN RUN 

1615 FOR PAUSE=1 TO 400:NEn PAUSE:RET 

URN 

If you would like the computer to tell you 
when there are only a few cards left to turn, 
type in these two lines. 

125 IF IN=49 THEN SOSUB 1475:RET0RN 
1475 SOSUB 1600: ■? "YOU HAVE 3 CARDS LE 
FT IN THE DECK";:GOTO 1610 

Henry L. Smith 
Newburgh, NY 



Atari Microtext Enhancement 

After reading Randy Rogel's letter (Ap- 
ple Microtext In-line Editing) in Hints and 
Enhancements, Issue 33, 1 felt that the same 

SoftSide 



thing was needed for the Atari version. The 
following line will enable you to select the 
line to be edited, as before. But now you 
will be able to use the right arrow key to 
skip over the text that is to remain un- 
changed. 

510 IF C=42 THEN Ct=TI(LP(EL-l)+CHAR,LP 
(EL-!)+CHAR):BOTO 740 

Tron Black 
Salt Lake City, UT 



Disk Snooper changes 

Here are two suggested changes to Disk 
Snooper (SoftSide, Issue 32). 

Change the end of line 2200 to read 
THEN 2190, instead of THEN 2150. This is 
more efficient, since it eliminates re- 
entering the track number if you only 
messed up the sector number. 

If you have 40-track disk drives, the pro- 
gram will read all 40 tracks if you modify 
the parameters in lines 2160 and 2170 to ac- 
cept track numbers as high as 39. 

Nick Kontis 
Valencia, CA 



TRSDOS Password Problems? 

If you need to make a backup of a disk, 
and you have forgotten the password, don't 
panic. It is possible to alter the master 
password on a disk even if you have forgot- 
ten it. 

1). Take a disk with a known password 
and boot it. 

2). From DOS, type PROT (PW) and hit 
ENTER. 

3). Answer the MASTER PASSWORD? 
query and wait for the disk to stop spin- 
ning. 

4). Now remove the disk and replace it 
with the one whose password you want to 
change. 

5). Answer the NEW PASSWORD? 
query with the password you want and hit 
ENTER. The new password will be written 
to the disk. That's all there is to it! 

Joseph Goudreau 
Malone, NY 
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HoH much do you knoM about RPL? 



■ traditional APL symbols or mnemonic keywords 

• utility program libraries 

• the most complete set of documentation on the market. 

Try the APL* PLUS/80 for yourself. Mail in the coupon below with 
your payment and we'll send you the APL*PLUS/80 Application 
Development System-all you need to run APL on your TRS-80 Model 
III. If you'd like more details, check the box on the coupon and we'll 
send you our free information package. 

We're STSC, Inc., the leading supplier of APL software and services in the 
United States. Our APL*PLUS systems have been serving the professional and 
business world for more than.l2 years. 

APL*PLUS/80 runs under TI«DOS 1.3orLDOS5.1 on a 48K RAM TRS-80 
Model III with two disk drives. The APL*PLUS/80 comes with a custom API- 
character ROM and a self-adhesive keyboard label set to convert your TRS-80 
to include the APL character set. 



stsc 



Q. APL uses "funny symbols." D TRUE D FALSE 

A. TRUE. 

Some of the symbols in APL are unfamiliar. But many of them are so 
familiar that you've been using them since grade school. Symbols 
such as -h - X i < > and = .Others, like; and/ , have new uses in 
APL, but you're familiar with them as symbols. These symbols and 
the "funny" symbols (for example, p i \ and e ) make APL very concise 
and, therefore, very productive. One APL symbol often does as much 
as an entire statement in BASIC. 

Our APL*PLUS»/80System,developedespeciallyforyour TRS-80® 
Model 111, offers you the choice between using the traditional APL 
symbols or our English-like keywords. But even if you start out using 
the mnemonic keywords rather than the "funny" symbols, you'll soon 
want to make the transition to the APL symbols because they save 
you time, space, and effort. 

Q. APL is hard to learn and to use. DTRUE D FALSE 

A. FALSE. 

Like evejything else, learning APL takes some concentration, but most 
users find APL so appropriate to their projects that they can develop 
their solutions while learning the system. Our simple tutorial, /ifZ. Is 
Easyl, leads off the complete documentation package we provide with 
the APL*PLUS/80-everything you need for building applications 
whether you're a beginning user or an experienced APL programmer. 
APL is easy to use too. You can write useful applications in your 
first learning session, and soon you can develop and maintain pro- 
grams in one-fourth to one-tenth the time it would take you in BASIC. 
APL handles many "housekeeping chores" that other languages saddle 
you with (from dimensioping arrays to loop control). 

APL* PLUS/80 -A Complete Application Development System 

Would you like to develop and deliver solutions faster and better for 
yourself or for your clients? With STSC's APL*PLUS/80 you can. Our 
APL*PLUS system features increase the power and productivity of 
the APL language, and the APL* PLUS/80 brings these proprietary 
enhancements to your TRS-80 Model III: 

• complete APL language and system features, upwards 
compatible with our mainframe systems 

• powerful output formatter 

• array-oriented file system 

• access to regular TRSDOS® or LDOS® files and subroutines 

• communications features to allow use of TRS-80 as a simple 
terminal or under APL program control 

APL*PUJS is a service mark and trademark of STSC, Inc., registered in the United States Patent and Trademark Office. TRS-80 and TRSDOS are 
registered trademarks of Tandy Corporation. LDOS is a registered trademark of Logical Systems, Inc. 



Attn: APL*PLUS/80 Distribution 

STSC, Inc., 2115 East Jefferson Street 

Rockville, Maryland 20852 (30 1 ) 984-5000 (orders only) 

Yes, send me the APL*PLUS/80 System ($295* in U.S. and Canada). 
D My check is enclosed. (Postpaid in continental U.S.) 

D Cheirge my MasterCard Account * 

MasterCard Bank * 



D Charge my VISA Account ' 



MasterCard/VISA expiration date _ 



Credit card customers add $4.00 postage and handling in conti- 
nental U.S. 

*Add applicable state and local sales taxes in CA, CO, CT, IL, MA, 
MD, MI, NC, NM, NY, PA, TX, WA. 

I'd like to know more about the APL*PLUS/80 System. 

D Send me your free information package. 

Name 

Address : 



City 

Phone (1_ 



.State, 



-Zip. 
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Hints continued 
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You could win a FREE 

SoftSide DV or CV 

Subscription! 



SoftSide's Translation of the Month has been so well received by our 
readers, we're offering a greater author incentive than ever before. No, we 
can't give you a job at the U.N., but we will award a one-year subscription 
to SoftSide DV or an 18-month subscription to SoftSide CF for a high- 
quality translation of one of our past programs. That's a value of $125 for 
the DM Version or $112.50 for the Cassette Version — you'll be rewarded 
every month for your translation efforts! 

Here are some of the most important qualifications we look for in a 
translation winner. 

Your entry must be a translation of one of the featured programs from a 
past issue of SoftSide (We're particularly interested in Apple™, ATARI® , 
and IBM® PC translations of some of our older TRS-80® only issues. Write 
for a list of suggested candidates.) In general, we're looking for translations 
of programs which are a CHALLENGE to translate. Some of the programs 
we publish are written in more or less "generic" BASIC, which can be typed 
into another computer with very few changes. Although these programs re- 
quire the least effort to translate, they are also the least likely candidates for 
contest winners. 

Your translation should be thoroughly tested and completely bug-free. 
Just converting program lines doesn't automatically ensure a workable 
translation. Be sure to use-test your translation as carefully as you would 
test a program you had written entirely from scratch. 

Your translation should fully utilize the unique features of the computer 
for which it is written. The objective of a translation is to "fit" the capabil- 
ity and convention of its host computer, not simply mechanically dupHcate 
the operation of the original program. This is especially true of programs 
which use graphics, and should be kept in mind for such minor features as 
keyboard layout (use of such special keys as arrows, ESC, CTRL, CLEAR, 
etc.). Also be careful with screen formatting; a word that spills over into the 
next line because of a PRINT statement that wasn't properly rewritten 
betrays such carelessness that we'll probably reject your translation 
automatically. 

Your entry should incorporate any improvements and enhancements you 
can add to the original program. Don't feel that you have to limit yourself 
to the boundaries of the original. (On the other hand, don't go overboard 
and destroy the character of the original by completely rewriting it!) An 
enhanced translation is much more likely to catch our attention than a line- 
for-line duplicate, and it will have more value to our readers. 

It's not necessary to include extensive documentation with your transla- 
tion, only that which is different from the original. If most of the originally 
published documentation applies to your translation, simply say so. You 
should, however, include descriptions and explanations of any changes or 
enhancements you've made. 

All Translation Contest entries must be submitted on disk, with 
documentation in printed or typed form. Disks will be returned only if ac- 
companied by a self-addressed, stamped envelope. Send your entries to: 
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Translation Contest 
6 South Street, Milford, NH 03055 



Setting PC screen width from 
DOS 

Although it's simple to set the screen 
width from BASIC with the WIDTH com- 
mand, some users may not know you can 
do it from the PC DOS command level. 
DOS normally sets the screen width for the 
NTSC portion of the color/graphics 
adapter at 40 columns. NTSC is the signal 
you use if you have a standard color (or 
monochrome) monitor, as opposed to a 
high-resolution or RGB monitor. This can 
be a problem, particularly when, as hap- 
pened at SoftSide, you want to use Word- 
Star® on a standard monitor. WordStar 
does not set the screen width, but assumes 
an 80-column display. It cannot be used 
when the screen width is 40. 

The command to set the screen width 
from DOS is MODE. This command 
resides in a special file on the DOS disk; it is 
named M0DE.COM. Any disk that will 
use the MODE command must bear this 
file. If necessary, use the COPY command 
to put M0DE.COM on your disk. 

The form of the command is very simple. 
Just type "MODE 80" or "MODE 40", 
and hit the Return/Enter key. If you want 
to make a disk boot up with the screen in a 
particular mode, do the following at the 
DOS prompt, A : 

EDLIN AUTOEXEC.BAT 

I 

MODE 80 

DATE 

TIME 

Strike Ctrl-Break. (Don't follow this with 

Return /Enter.) 

E 

Remember to hit the Return/Enter key 
after each command. 

This will install a batch file on your disk. 
The special name "AUTOEXEC" tells 
DOS to execute the commands it contains 
on boot-up. If you want 40-column mode, 
replace the "80" above with "40". 

Fred Condo 
Milford, NH © 



Bugs, >§^ 

Worms, 

and 

Other 

Undesirables 

Atari Hopper 

In the Atari version of Hopper (issue 
35), a slight problem with the end- 
game screen display may be corrected 
by changing the keyword POSITION 
in line 2200 to PLOT. © 
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Get Omni quality 
for as little as $L99. . . 

even if all you 
want is a 
10 pack. 




Call toll-free for great savings on Omni s 
complete line of 5 'A" and 8" premium disks. 
Each is certified error-free at a minimum of 
twice the error threshold of your system. Each 
is rated for more than 12 million passes 
without disk-related errors or significant wear. 
And each is precision fabricated to exceed 
all ANSI specifications with such standard 
features as reinforced hub rings and Tyvec 
sleeves. Get same day shipment and an 
unconditional, no hassle money-back guarantee. 

ARCHIVE 

152 Boston Turnpike 

Shrewsbury, MA 01545 

(800) 343-0314; In Mass: 
(617) 756-2960 




I 



Call toll free 
(800) 343^314 

In Mass: (617) 756-2960 

Call if you're not sure which disk is compatible with your 

system. Call for prices on 96 tpi and special formats. We offer an 

unconditional money-back warranty. We're here to help. 

Be sure to indicate system/drive name and model i at right. 



5 '/4" disks 

Cost per 
10 pack QuantitY 

$19.90 

$23.90 



Single side/single density 

Single side/double density 

Double side/single density 

Double side/double density 

Flip/Floppy reversible 

Plastic library case 

(in lieu of wft storage box) 

Shipping and handling 

($Z.OO first 10 pack, 40« additional 10 packs. Continental U.S. only.) 

5% sales tax {Mass only) 



$37.50 
$39.90 
$ 2.99 



8 "disks 

Cost per 
10 pack Quantity 



$24.90 
$31.90 
$34.90 
$37.50 
$39.90 
$ 3.49 



Total 
Cost 



Dcheclc 
DCOD 

Card f 



I I Master Catd 

DVISA 

Exp 



System/dfive model f 
Name 



Addtess . 



Total 



Tel. 
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FESTIVAL 



Rock Show OR 9 
Technology Fair • 



by Virginia Lyons 
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An estimated 250,000 people 
gathered in the desert outside San Ber- 
nadino, California, on September 3-5, 
1982 for the US Festival. Bankrolled 
by computer wiz and co-Apple™ foun- 
der, Steve Wozniak, to the tune of 
$12.5 million, the US Festival was 
billed as the end of the Me Genera- 
tion and the beginning of the Us 
Generation. 

The Festival was to have been a 
blend of a technology fair and top 
name rock and roll bands in the 
world's largest outdoor amphitheater. 
The calibre of bands and quality of 
musicianship created one of the best 
rock performances in years. The 
technology fair, however, was disap- 
pointing to both visitors and ex- 
hibitors. In a September 5 news con- 
ference, Steve Wozniak admitted that 
the technology fair had been gradually 
relegated to a much less important 
14 



place relative to festival site construc- 
tion, organization and safety precau- 
tions. In these aspects, the Us Festival 
was outstandingly successful. The 
technology fair, however, has much 
room for improvement. 

All technology exhibitors under- 
stood there were to be no actual sales. 
Rather, they were there to expose an 
unfamiliar public to computer tech- 
nology. There was to have been an 
amateur "Home Brew" category of 
computer products, applications, and 
contests. Unfortunately, the Home 
Brew division never happened. 
UNUSON Corporation, the festival 
creators, got too bogged down in con- 
struction problems and the rock and 
roll show production. 





Personal Computers 

Despite the sparcity of exhibitors, 
110 degree heat, choking dust and the 
Home Brew cancellation, there were 
some exciting exhibits. Hats off to Ap- 
ple Computer for the most interesting 
and appropriate personal computer 
booth. One Apple staffer admitted that 
there had been some controversy re- 
garding whether to show or not. After 
all, this was a rock and roll festival — 
not really Apple's business — and 
there would be no sales. About twenty 
Apple employees wanted to attend so 
badly, however, that they decided to 
set up a display. 

Attractively featured at the Apple 
booth were educational, business, 
engineering, scientific, and graphic ap- 
plications. On the last day, one of the 
misplaced Home Brewers even at- 
tached his Polaroid camera adapter to 
one of Apple's computers. This par- 
ticular application was quite popular 
with the crowds, who waited patiently 
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for a snapshot of a portrait on the 
monitor. Finally, an instant way to 
prove those high game scores! Apple 
even launched their enormous hot air 
balloon, which decorated the night sky 
behind the sound stage. 

Atari® displayed about 30 arcade 
games in a 50 foot exhibit — a very 
popular display with kids and adults 
alike. It was a great opportunity for the 
crowds to beat the heat in the air condi- 
tioned tents. Unfortunately, Atari did 
not seem interested in emphasizing any 
other applications of the personal 
computer. 

Commodore made a half-hearted at- 
tempt at an exhibit, showing only the 
VIC-20 with very little accompanying 
literature. Atari and Commodore 
missed a great opportunity to position 
their products relative to other 
systems. IBM, Xerox, Sony, Epson, 
Fortune and other large microcom- 
puter manufacturers did not even 
bother to show products. 



New Inventions 



There were some pleasant surprises 
for those brave souls who could ignore 
the magnetic pull of the music in the 
amphitheater and spend time meeting 
people in smaller exhibits. There was 
even a robot museum with highly 
amusing and anachronistic applica- 
tions garnered from a decade of 
broken toasters and toys. 

One of the more interesting entries 
came from Eclectic Electric located in 
Palo Alto, CA. Lucia Grossberger and 
Harry Vertelney, authors of the 
Designer's Toolkit, demonstrated their 
new graphic system marketed by Apple 
Computer. A plastic grid is placed over 
the Apple Graphics Tablet. Some of 
the features of the Designer's Toolkit 
include over 20 paint brushes, inverse 
video, cropping and enlargement of 
image sections, character input from 
the keyboard, split screen, and 
geometric design. The system is a nice 
synthesis of art and science. Also 





featured were Lucia's 5 1/4 inch floppy 
Art Disks. These images included con- 
tinuous variations on geometries and 
rock heroes. 

Numia Institute displayed an Apple 
Computer controlled hydroponic 
farm. On a twenty acre farm outside 
Tucson, Arizona, farm owners Tony 
Crow and Jenny Starlight set up 
shrimp and warm water fish "green- 
houses" alongside their vegetable 
fields. The Talapia fish and shrimp are 
nourished by detritus from poultry 
manure. When the water from the fish 
ponds becomes saturated with fish 
waste, it is dumped on the fields. A 
fresh water well then replenishes the 
ponds. Numia Institute is interested in 
forming an information network with 
other computer users. They can be 
reached at Box 532, Marana, Arizona. 

For computer users looking for an 
alternative to the more expensive infor- 
mation networks, CommuniTree 
Group of San Francisco presented their 
low cost conference system. The heart 
of the CommuniTree Network is a 48K 
Apple II Plus. Director Dean Gengle 
claims that 90 percent of all terminals 
can actually access the system. After 
initial purchase of the software, 
businesses, educational facilities and 
individuals pay only $15 per year to 
register their phone number with Com- 
muniTree. Purchasers who elect to 
keep their phone numbers private may 
still receive updates from Com- 
muniTree. Nationally, there are about 
150 subsystems. Typically, each sub- 
system has 100 to 150 individual users. 
CommuniTree plans to expand their 
software systems for IBM® PCs and 
TRS-80® Model III computers. 

Novation of Tarzana, California, 
presented their new portable terminal, 
the Infone. The device features a stan- 
dard Qwerty upper/lower keyboard, 
with full ASCII character set. It has 
CPU memory of 8 to 32K, 2 to 8 bytes 
of text memory, and up to 256 bytes of 
speech memory. It has three modes of 
modem operation with a maximum 
1200 baud rate. AIL modes have auto 
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answer. It has a built-in speaker with 
volume control and an elegant, slim 
handset. Incredibly, its dimensions 
are 1 1/2 inches X 7 inches X 10 3/4 
inches, and it weighs only 2 1/2 
pounds. Novation also provides an 
acoustic coupler accessory which can 
be used anywhere. The terminal sells 
for about $1150. 

Gordon French, of Square- 1 in 
Menlo Park, CaHfornia, astonished the 
crowds with his demonstration of 
Floppy Armour, a cardboard mailer. 
Volunteers defied the laws of physics 
by folding 5 1/4 inch floppy disks in- 
side the mailers. The mailer takes all 
the crease of the fold, leaving the disk 
unharmed. Quantities of 100 5 
1/4 inch mailers sell for $79; 100 8-inch 
mailers cost $180. 



Computer Music 

For a music festival, there were sur- 
prisingly few music applications. Two 
groups always had large crowds — 
Syntauri Corporation, creators of the 
Alpha Syntauri system, and Passport 
Design, Inc. from Half Moon Bay, 
California, manufacturers of the 
Soundchaser Music System. 

In addition to demonstrating the 
Alpha Syntauri system, Syntauri also 
featured performers. Emmett Chap- 
man of Stik Enterprises played his 
stringed invention, the Stik. 
Simultaneously, youthful groups 
gathered to work out on Syntauri's 
new drum interface. A small drum sur- 
face and a pair of earphones allowed 
eight to nine musicians the privacy of 
their own beat. Best of all, each player 
could hear how the rhythm would ac- 
tually sound. 

Passport Designs demonstrated their 
monophonic transcription system for 
the Soundchaser — the Notewriter. It 
writes one Hne of music at a time as it is 
played on a keyboard. Editing features 
can move themes, add notes, change 
meter and keys. Notewriter also prints 
the transposition. 




NO-FAULT 
GUARANTEE 

on all MIS Magnetic Media 

Call in orders collect 

(203) 735-6477 
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COMPUTER DISKETTES 

COMPUTER CASSETTES, 
CASSETTE DUPLICATING SERVICE 

APPLEIBM(P.C.)-ATARIHEATH-OSBORN 
COMMODORE-TRS-80-SINCLAIR-NORTH STAR 



Diskettes 100% Certified Pri 

5-V4" SSDDSoft Sector 

W/Hub Ring $2.75 

5V4 " SSDD 10 Hard Sector 2.75 
5V4 " DSDD Soft Sector 3.75 
8" SSDD IBM Compatible 3.50 



$25.00 
25.00 
35.00 
32,50 



Computer Cassettes with MAXELL Computer 
Cassette Tape 100% Certified - Instant Play/ 
Record -Sliding Lock Out Doors 



C- 5 (25 Feet) 2.00 i 17.50 i: 
C-10 (50 Feet) 2,25 : 20.00 i 
C-20 (100 Feet) 2.65 22.00 ; 
C-30 (150 Feet) 2,75 , 24,00 : 
C-60 (300 Feet) 2,90 : 26.00 : 
C-90 (460 Feet) 3.10 30.00 ; 
Cassette Duplicating ■ Add $2.00 per unit. 
U Ctieck D Master Ctiarge D Visa 
Card # Expiration Date 



Send to: Magnetic Information Systsms 

P.O. Box 806, 415 Howe Ave., Sfielton, CT 06484 

(203) 735-6477 • Dealers Inquiry Welcomed 

Minimum Credit Card Order $10.00 



-Mcct%- 
Conjputer $9.95 



A Different 
instruction book for 
young people . . . 

for TRS-80 or Apple li 
By Marjorie Crabbe, 
an experienced 
elementary teacher. 




MEET THf 
COMPUTER 



Are Your Children anxious to use the computer 
for "real programming"? 

Would you rattier liave the children control the com- 
puter instead of the machine controlling them? 

If you haven't the time, or are not sure how to 
teach them. Meet the Computer will provide the 
help you need. 

• An easy-to-read book to help elementary age 
children— at home or at school— learn BASIC 
programming with little or no assistance from 
adults. 

• Important Concepts set off in boxes, and 
repeated throughout the text. 

• Complete cross-referenced, easy-to-understand 
glossary and index to reinforce concepts and 
clarify definitions. 

To Order; Crabbe Associates 

212 W, Graham Ave,, Lombard. II 60148 

QSend copies of Meet The Computer @ $9.95. Add 

$1.50 for shipping per copy. Illinois residents add sales lax. 

Name 

Street 

City State Zip 




The very last day of the US Festival 
brought the largest crowds to the 
technology tents, as many visitors 
decided to take the last opportunity to 
view the exhibits. Frankly, the tents 
were not large enough to accommodate 
the crowds who used the occasion to 
spend the afternoon in an air condi- 
tioned environment. Consequently, 
there was not much circulation of 
people. However, readers who have at- 
tended other computer fairs and ex- 
positions should not be discouraged. 

It's a great idea to include new 
technology as part of a rock festival. 
Wozniak said that most fairs include 
some sort of crafts, but after a while all 
beh buckles look the same. Hopefully, 
his festivals, now tentatively scheduled 
for next Memorial Day and Fourth of 
July, can create a larger role for 
microcomputer technologies. The 
facility is now the property of the 



County of San Bernardino. Because 
that vast playground is established, 
more of Wozniak's attention can be 
turned towards making the computer 
and technology fair more entertaining 
and informative. 

His corporation, UNUSON, has 
credibility in terms of creating a large 
rock event. It still must prove itself in 
creating a truly unique technology fair. 
It is appropriate to provide a forum for 
small computer companies and in- 
dividual application, but large 
manufacturers should also be allowed 
to sell their products. There could be 
prizes for (debugging contests, best 
spreadsheet templates, graphic art, 
sound synthesis, and other imaginative 
applications. Every year thousands 
more people become microcomputer 
users, tinkerers, and dreamers. 
UNUSON needs to expend more effort 
to attract these users to come and 
participate. © 
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NEW FOR ATARI from mmg micro software 



NOW - THE TWO MOST POWERFUL AIDS FOR ATARI BASIC!! 




BASIC COMMANDER 



Single key entry file commands 

^ ENTER "D: - SAVE "D; 

^ LIST "D: - RUN "D: 

— LOAD "D: 

Single Key DOS functions from BASIC 

— FORMAT a disk ^ LOCK a file 

— RENAME a file - UNLOCK a file 

^ DELETE a file ^ DISK DIRECTORY 

THREE PROGRAMMABLE KEYS!! 

— single keys programmed for your own use, even 
whole subroutines 

AUTONUMBER 

— automatically generates line numbers for you — 
speeds program entry 25-75"o 

BLOCK DELETE 

— deletes any range of lines instantaneously! 

RENUMBER 

— renumbers lines and all references 

— extensive error trapping 

— 3 seconds to renumber 500 lines 




MMG BASIC DEBUGGER 



• TRACE through your Basic program 

— Single step — TRACE while 

— TRACE UNTIL — change variables 
~" LIST line numbers executed 

— examine variables' values 

• Full screen BASIC editing 

— scroll up or down by cursor 

— edit your whole program easily 

— no more LIST line number ranges 

• Split screen mode 

— view two parts of your BASIC program at once, 
and edit both! 

— scroll each window independently 

• CROSS REFERENCE 

— provides a list of variables and the line numbers 
in which they are used in your program 

• SEARCH FOR PHRASE 

■- search your BASIC program for any phrase, 
command or string of characters; let your 
computer do the searching for you! 



EACH PRODUCT ALONE REQUIRES 16K, AND IS AVAILABLE ON DISK FOR ONLY $34.95 
Now, the convenience of both powerful utilities together in your Atari at once 
The Combined Basic Commander and MMG Basic Debugger requires 24K. $74.95 



ADDITIONAL PRODUCTS 



NECESSITIES 

RAM TEST II - The fastest and most thorough memory test available for the 
ATARI has now been further improved! Tests not only all locations, but also tests 
the memory addressing system. This all machine language program takes 4 
minutes to test 48K. It's the only program that tests the cartridge area of RAM. 
Good for new 400/800 computer owners, for testing new RAM boards and for use 
in computer stores to test and pinpoint bad memory locations. Bad memory 
locations are pinpointed so repair is as simple as replacing a chip! 

Requires 8K, Disk or Cassette $29.95 

DISK COMMANDER II - Just save this program on your BASIC disks and it will 
autoboat and automatically list all programs for the disk into your screen. Simply 
run any program by typing a single number. 

Requires 16K, Disk Only $29.95 

TUTORIALS 

ASTEROID MINERS • This 50 page book and program provides for a unique 
intermediate to advanced tutorial. A 32K BASIC game utilizing over 25 players in 
player-missle graphics, machine language subroutines, a redefined character set, 
multiprocessing utilizing the vertical blank interrupt interval, and much more! 
The 50 page book included with the program documents each part of the entire 
program and contains the fully documented source code for both the BASIC and 
assembly language parts of the program. Use these routines in your own 
programs. These examples make it easy! 

Requires 32K, Disk or Cassette $34.95 

GAMES 

CHOMPER - An all machine language arcade style game with intelligent 
monsters. Requires 16K Ram, 1 Joystick and nerves of steel. 

Available on Disk or Cassette $29.95 

BUSINESS/HOME 

MAILING LIST - Extremely fast BASIC and machine language program. Each 
data disk holds over 500 files. Sort on any of 6 fields at machine langugage speed 
or search on any fragment of a field! Use any size labels or envelopes. 

Require 40K, Disk Only $39.95 



NEW 



MMG DATA MANAGER - If you frequently find yourself looking for 
something, only to find it eventually right under your nose, then MMG DATA 
MANAGER is for you. Organize virtually anything into a computer-searchable 
format, and let your ATARI do the hunting for you. MMG DATA MANAGER is 
the first of a series of business applications from MMG MICRO SOFTWARE, all 
of which will share the ability to access files created by any of them. This flexible 
database manager will allow many fields, with machine language sorting, on any 
field. In addition, you have total control of the structure of your data, allowing you 
to design a database which you feel most comfortable. A special feature of MMG 
DATA MANAGER is its ability to select for a given value of any single field, or any 
combination of values from many fields. You could, for instance, determine who 
lived in Las Vegas, Nevada, and bought item #3145 from you, and whose last 
name began with SM, and whose telephone number began with (702) 873-4. You'll 
never lose track of information again! Multiple print options add to the versatility 
of MMG DATA MANAGER. 
RSquir.es 40K, Disk Only $49.95 

Available At Your Favorite Computer Store 
OR Send a Check or Money Order to: 

MMG MICRO SOFTWARE 

P.O. Box 131 • Marlboro, NJ 07746 
OR CALL 

(201) 431-3472 

For MasterCard, Visa or COD Deliveries 

(Please Add $3M For Postage & Handlm) 

NJ RESIDENTS ADD 5% FOR SALES TAX 

ATARI is a registered trademark of ATARI, Inc. 
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y^. ' "The ONLY Book Club for micro hobbyists" 



Save time and money 
Keep up with the latest in 
computer books and software 
without leaving your terminal! 

Select 5 fact-filled books 
for ONLY $2^^^^^'"^^*°^^°^^^^ 
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List $16.95 



1396 
List $13.95 



Csmpyisr 
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,449 
List $19.95 



7 very good reasons to try 
The Computer Book Club 

Blue Ridge Summit, PA 17214 

• Reduced Member Prices. Save 20 % to 75 % on books sure 
to increase your computer know-how 

• Satisfaction Guaranteed, All books returnable within 10 
days without obligation 

• Club News Bulletins. All about current selections— mains, 
alternates, extras— plus bonus offers. Comes 13 times a year 
with dozens of up-to-the-minute titles you can pick from 

• "Automatic Order." Do nothing, and the Main selection 
will be shipped automatically! But ... if you want an 
Alternate Selection— or no books at all— we'll follow the 
instructions you give on the reply form provided with every 
.\'ews Bulletin 

• Continuing Benefits. Get a Dividend Certificate with every 
book purchased after fulfilling membership obligation, and 
qualify for discounts on many other volumes 

• Extra Bonuses. Take advantage of added-value promo- 
tions, plus special discounts on software, games, and more 

• Exceptional Quality. All books are first-rate publisher's 
editions, filled with useful, up-to-the-minute information 



Jhs [jcrniiijiar Eui]^ Siud 

Blue Ridge Summit, PA 17214 

Please accept my membership in The Computer Book Club 
and send the 5 volumes circled below, billing me $2.95 plus 
shipping and handling charges. If not satisfied, I may return 
the books within ten days without obligation and have my 
membership cancelled. I agree to purchase 4 or more books 
at reduced Club prices (plus shipping/handling) during the 
next 12 months, and may resign any time thereafter. 

336 337 554 806 1123 1160 1169 1195 

1200 1205 1228 1251 1275 1277 1295 

1299 1332 1389 1391 1394 1396 1398 1421 

1428 1449 1468 1478 1485 1496 1506 



Name 



Phone 



Address 

City 

State 



Zip 



(Valid for new members only. Foreign and Canada add 20%. Orders outside U.S. 
or Canada must be prepaid with international money orders in U.S. dollars.) 
This order subject to acceptance by The Computer Book Club. ^^ SFSD-163 ■ 
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Starting Forth 



Reviewed by Peter J. Favaro 



by Leo Brodie, FORTH INC. (Pren- 
tice-Hall, Inc., Englewood Cliffs, NJ 
07632) Price: $15.95 

If you have ever attempted to teach 
yourself a skill, you can appreciate 
both the pains and the pleasures of 
such a task. I, like many other game 
designers, software developers and 
hobbyists, am a self-taught com- 
puter programmer who has driven 
into many ditches on the road to 
proficiency. 

Learning BASIC was a chore. After 
breezing through the beginners level 
with a severely and prematurely in- 
flated ego ("Hey, this stuff is a 
piece of cake, bring on the hard 
stuff!"), I stumbled through the more 
advanced levels with feelings of 
frustration, incompetence and 
bewilderment, as the instructional 
articles and books that I read 
all assumed that I had an ex- 
pert's knowledge behind me. Sure, 
there was a great deal of information 
on BASIC programming techniques, 
but none of it ever seemed to suit my 
present needs or ability level. Much of 
what I read simply appeared to be 
"alphabet soup." Remember all of 
those program listings that did wonder- 
ful things once you typed them in and 
debugged them, and you couldn't 
understand why? How frustrating! 
There was no solid text to support what 
was happening in those listings. What 
made it worse was that the authors 
kept telling you how easy this or 
that application was. Before read- 
Leo Brodie's Starting Forth 
(Prentice-Hall, $19.95), I had 
made an unconscious vow to be 
satisfied with my knowledge of 
BASIC, Microsoft BASIC and 
Assembler for my particular com- 
puter. Enticed by the irresistible 
charm and "reader friendliness" 
of this book, however, I have 
decided to learn FORTH, in spite 
of my prior experiences. 

Before I begin to summa- 
rize both the fine points of 
Mr. Brodie's book and the ad- 
vantages of FORTH in general, 
from a beginner's point of 
view, let me say that Starting 
Forth is written for everyone. 



Yes, everyone — from the rank 
amateur to the seasoned computer pro- 
fessional. Mr. Brodie begins his book 
by assuming that the reader has ab- 
solutely no knowledge of FORTH and, 
moreover, no knowledge of computers 
whatsoever. He holds his readers' 
hands and walks them through the 
basics of FORTH, structured program- 
ming philosophy, computer architec- 
ture, and much more. What a relief. 
No pressure to perform, no wondering 
about how much background the 
author expects you to have in his area. 
For those of you who feel comfortable 
enough without this introduction, my 
advice is to roll up your sleeves and 
dive right into the more advanced 
chapters. I, on the other hand, am one 
of those people who, in the summer- 
time in the sweltering heat, sit by the 
steps of the pool "just getting my feet 
wet." Suffice it to say, I Uke to take it 
nice and slow. 

In the opening chapter, (written as 
the introduction to beginners) Mr. 
Brodie explains that FORTH is a 
highly structured and very precise 
language whose power lies in the fact 
that the FORTH programmer can 
create user-specific definitions de- 
signed to carry out specific tasks within 
a program. For instance, all Atari® 
users know that it is difficult to move a 
player object vertically on the screen. 
In FORTH, a definition that the pro- 
grammer might call VMOVE could be 



"Starting Forth 
is written for 
everyone... 
From the rank 
amateur to 
the seasoned 
computer 
professional." 



stored in the FORTH "dictionary" 
and used to perform this task. The 
FORTH word for "definition" is 
simply "word", so it is said that the 
user is constantly updating the FORTH 
"dictionary" with new "words." The 
fact that I used a game application to 
demonstrate a FORTH concept was no 
accident. FORTH promises to be an 
excellent game development language, 
largely because of its speed, which is 
about ten times faster than BASIC 
(although not quite as fast as Machine 
Language). 

In walking us through the computer 
architecture, Mr. Brodie explains that 
FORTH is a "stack-oriented" 
language with commands, (actually 
words) such as SWAP, DUP, and 
ROT, which pertain directly to stack 
operations. The "stack," as most 
assembly language programmers 
know, is a key area in RAM where 
much of the data manipulation is 
performed in a "last in, first out" 
fashion. This means that the first 
number to be put into the computer 
goes down on the stack and doesn't 
come off the stack until all the 
numbers which follow it are taken 
care of or operated on. Understanding 
how all this works can get very confus- 
ing. Even simple arithmetic opera- 
tions are written in RPN (reverse 
Polish notation), so that even a 
straightforward operation like "2-1- 
2" becomes "22-I-." However, the 
patient reader can adapt to 
FORTH's topsy-turvy world. 
What would seem to be a syntax 
that borders on the bizarre even- 
tually becomes very clear. Mr. 
Brodie explains concept after con- 
cept m a logical, orderly progres- 
sion, using every technique he can 
muster up, from humorous car- 
toons (which he illustrates himself) 
to meaningful comparisons to 
everyday living. 

After this rather important 
groundwork is laid and the reader 
becomes familiar with FORTH 
syntax and structure, it is all 
downhill. Chapter three teaches 
the functions of the FORTH 
editor and the principles of using 
the magnetic disk as a storage 
device. Briefly, disk memory is 
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divided into units called "blocks," 
each of which holds 1024 char- 
acters, or 16 lines of 64 char- 
acters each. This sixteen line 
block is also called a "screen," 
and FORTH programs are written 
and organized screen by screen, 
or block by block. Chapter 
five presents a nice discussion 
about the relative advantages of 
using a fixed point package over 
a floating point package to do 
arithmetic and express numbers. 
Some good arguments are pre- 
sented here, even though many 
commercially available FORTHs 
come with a floating point 
package. It was when I fin- 
ished reading this chapter that I 
began to realize what a good book 
Starting Forth is. Before reading it, 
if someone had come up to me and 
asked me if I thought I could be in- 
terested in reading about the merits of 
using a fixed versus floating point 
package I would have said, "never." 
Trust me, it's worth taking a look at. 
The remaining chapters deal largely 
with programming concepts which in- 



"As it stands 
right now, 
Starting Forth 
promises the 
most success 
in helping the 
reader learn 
FORTH on his 
or her own." 



elude decision-making, branching, 
looping, an excursion into variables, 
an introduction to the binary num- 
ber system, input/output operations 
and much more. There are also use- 
ful examples, sample FORTH screens, 
and a handful of charts and refer- 
ence tables listing the FORTH words, 
which are located in the back of the 



book. Mr. Brodie leaves absolute- 
ly no stone unturned. 

In summary, the advantages of 
learning FORTH are its speed, 
flexibility and power. Its disadvan- 
tages are apparent only to those 
who feel uncomfortable letting go 
of conventional programming syn- 
tax, or put off by the fact that a 
FORTH program takes a little 
longer to write than, say, a BASIC 
program. If you decide that 
FORTH is for you, the next step is 
selecting some reading material 
that will help you learn the 
language. As it stands right now. 
Starting Forth promises the most 
success in helping the reader to 
teach himself FORTH. It is by far 
the most comprehensive book on 
the subject available. One word of cau- 
tion, though. You will never be able to 
read this book just once. The beginner 
should read it three times — once to 
benefit from the general discussions of 
computer architecture and program 
structure, once to learn the FORTH 
words, and once to put everything 
together. 
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Release Date: December 1, 1982 for: 
Apple II 48 K system operating with DOS 3.3 
Apple III 96 K system operating with SOS 1.1 



& Business Basic 



MESA RESEARCH, INC. • Rt 1, BOX 1456A • Waco, Tx. 76710 
Phone 817/848-5272 



F'leasc send mc 

EnclosKl is $ 

charges. 



_ copies of Net Worth Calculator, Apple U/Appie III (scratch one). 
which includes tax and $2.00 each for shipping & handling 
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if You Sell Small Business or Personal Computer Systems, Word Processing, 
Software, Media & Supplies, or Computer Services... 

Have We Got An Offer 
For You! 



Why Prospect? 

The answer is obvious. Without prospecting... 

No Business But. there's a better way. ..COMPUTER 

SHOWCASE EXPO' 

This proven series of regional, end-user expositions 

has brought thousands of prospects, with needs in 

mind and buying dollars m hand 

THE INTERFACE GROUP, the worlds largest 
producer of computer shows, offers you instant 
availability to a wide variety of end-users such as: 

• Doctors • Lawyers • Accountants • Retailers 

• Corporate Managers • Many Other Professionals 

These face-to-face contacts are in businesses such as: 

• Banking • Health Care • Insurance • Education 

• Government • Real Estate • Manufacturing 

• Distribution 

If you sell computers, or computer systems, as a 

solution for a variety of Small Business problems, 

COMPUTER SHOWCASE EXPO offers you more 

prospects in a few days than you could possibly see in 

months! 

For more information on how you can reach the 

market you need, call THE INTERFACE GROUP, toll 

free at (800) 225^4620 

(In Massachusetts, call 617-879-4502) 
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Why an Alternative? 

There are over two million microcomputers in homes and offices today, and the 
number is growing minute by minute. BASIC is the programming language most 
commonly used in these microcomputers, in uncounted dialects and variations. 
But the ads in any computer magazine reveal that other languages are offered to 
the microcomputer user, and articles in these and other magazines and 
technical books suggest that BASIC might not be the best language to use. Indeed, Edsger W. 
Dijkstra, who is said to have invented the whole idea of unstructed programming, once wrote 
that, in his opinion, learning BASIC mentally damaged the programmer "beyond hope of 
regeneration." 

Whether this is true or not, a number of people are concerned with finding an alternative to 
BASIC. BASIC does, after all, have certain severe limitations — it is structured, it takes a lot of 
memory, it is slow, it is not self-documenting, its file-handling is clumsy, it sometimes requires 
Machine Language subroutines, it encourages sloppy programming. 

Another problem is the wide variety of dialects, or differing forms of BASIC. Some of these 
are available for microcomputers in general, and some are proprietary to specific brands of 
micros. Programs written on one machine will probably not run on a different machine. One 
written with one compiler or interpreter will certainly not run on another, without considerable 
hand translation. BASIC is not very transportable. 



Alternatives To 




by Allen L. Wold 

"0/ the two hundred or so 
languages available, the ones 
most widely advertised and used 
on microcomputers, aside from 
BASIC, are Pascal, C, FORTH, 
and LOGO. Each of these four 
languages has its own 
proponents, its own reasons for 
being a suitable alternative to 
BASIC. " 
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The very variety of BASICs available, each designed to conform to a particular set of pre- 
judices, implies that its limitations are not inherent in the language itself. Some versions are 
compiled and fast. Others are nearly structured without line numbers. There are versions with 
graphic and sound capabilities, advanced mathematical functions, and so on. A compiler or in- 
terpreter could be written to include almost any kind of function or operation one desired. 

BASIC still, in most cases, uses a casual approach to logic, lots of GOTO statements, and in 
some cases requires the programmer to deal directly with memory locations by means of PEEK 
and POKE statements. Compensating for this is the fact that BASIC is easy to learn (too easy, 
some say), and is already, by default, the common tongue. 

BASIC was not intended to be the end-all of computer languages. Its name is an acronym for 
Beginner's All-purpose Symbolic Instruction Code. It was originally designed, at Dartmouth, 
as a very simple language to be used on a time-sharing system to familiarize computer students 
with a programming language they could learn interactively while waiting for their FORTRAN 
or COBOL batches to turn around on the main frame. Since then it has, like a fungus, simply 
grown. 

Of the two hundred or so languages available, the ones most widely advertised and used on 
microcomputers, aside from BASIC, are Pascal, C, FORTH, and LOGO. (COBOL and FOR- 
TRAN do not seem to be offered as alternatives, though they, too, are widely advertised.) Each 
of these four languages has its own proponents, its own reasons for being a suitable alternative 
to BASIC. 
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The Question of Language 

It's unfortunate that the term "language" is used in reference to BASIC, SNOBOL, RPG, 
and ALGOL, though eventually that term may be more accurate than it is now. Language, as it 
commonly understood, is a means whereby people communicate with each other. It is a tool for 
the exchange of ideas, infinitely flexible and extremely complex. Indeed, the rules which govern 
English are so complex that they are not yet understood. (Whatever those rules are, they are not 
the ones, derived from Latin, which some of us older folks learned in grade school.) The science 
of Linguistics is trying hard to discover those rules, and some good generalizations have been 
made, but every description is full of exceptions and contradictions. 

Verbal language, however, follows another kind of logic than that used in mathematics or 
computers. When we control a computer, what we use is not a language in the above sense, but 
instead a specialized code which is translated into machine-dependent computer instructions. It 
resembles human language only because we make it that way. Human language, the way we 
think if we're being verbal, is not the strict mathematical logic of computers. 

We do not really "communicate" with a computer, since communication implies a two-way 
process, an exchange of information. Interaction between a computer and the user gives the il- 
lusion of communications, but it is only illusion. The computer itself, so far, contains nothing 
new, does not "think" independently, is not creative. 

Our communication with a computer is merely an elaboration of our communication with a 
table of logarithms or a card index. As computers become more powerful and complex, this will 
become less true. However, it will always be true to some extent. 

While we may not be able to actually communicate with a computer, we can communicate 
through a computer. This does not 
mean the use of modems or electronic 
bulletin boards. Rather, it means in- 
teractively programming a computer 
with ideas which the computer inter- 
prets into new ideas (or at least new 
configurations) which are then "read" 
by other people. 

For example, you might have an idea for aerodynamic airfoils, expressed in mathematical 
terms and physical concepts. I know nothing of the subject, and think in words and pictures. 
Using a computer, you can input your ideas, and the computer will give me a literally graphic 
demonstration — pictures, of what you're thinking about. I respond in words, which the com- 
puter translates into mathematical possibilities. 



'*When we control a computer, what we use 
is not a language,.. but instead a specialized 
code which is translated into machine- 
dependent computer instructions. 
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Natural vs. Artificial 

There is a difference between programming languages and human languages, of 
course. It's not just that programming languages are small, elegant (sic), strictly 
mathematical; and that human verbal languages are large, inelegant, and irra- 
tional, though those differences are significant. More importantly, computer 
languages are artificial constructs, while human verbal languages grew naturally. 

In a way, BASIC is more natural than, say, Pascal. One can compare Pascal with classical 
Latin. Although not what people spoke most of the time, classical Latin was designed by its 
grammarians to be what they thought the perfect language should be. 

There have been a number of attempts to create an artificial verbal language. The objective 
has been to provide an alternative to EngUsh (or French, or Russian, or any other natural 
language) so that people could communicate with each other, regardless of nationality. 

Languages such as Volapuk, Idiom Neutral, Ido, Esperanto, Loglan, and so on, have tried to 
capture the essence of language communication, using logical and consistent rules of grammar 
and spelling. Some claim to incorporate the basic elements of every language ever spoken, 
though they fail utterly. Esperanto, for example, makes little use of Chinese, Cherokee, or any 
African tongue. Each artificial language was designed to improve communications between 
people, to be more precise, to be easy to learn. 

The lack of success on the part of their creators, however, is illustrated by three facts. First, 
few people speak any of these languages, there is more than one "universal" language, and 
even the names of some are unknown to all but a few scholars. 

This is due, partly, to simple inertia, and the difficulty of learning languages in general. It 
takes a dozen or so years, from the moment of birth, to truly learn one's native language, which 
impUes that languages are too complex to be designed by any one person or group of persons. 

These artificial languages, in spite of high ideals, do not, in fact, reflect universal language 
concepts, only those of a particular language family, and the linguistic biases of their designers. 
In fact, any natural language could serve as the universal language, if only it were taught to 
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everybody. An artificial language is not needed, except to avoid the question of which natural 
language to use, and hence avoid the problem of chauvinism and national rivalry. 

Such artificial languages, like Latin and classical Greek, are frozen. If they are allowed to 
change, they will develop dialects of all sorts, and within a short while will be unintelligible to 
other speakers. Even with mass communications, this is happening with English today. Look at 
the following sentence: "The dustman left a tin of sweets in his shooting brake on the round- 
about and walked through the subway." In "American," that means the trash collector left a 
box of candy in his station wagon on the traffic circle and walked through the pedestrian 
underpass. 



user. 
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To Serve Or Be Served 

Fortunately, in order to create a computer language, one does not have to develop the full 
complexity and richness of a verbal language. One only has to design a system which serves two 
functions — it is readily comprehensible by a human, and it conveys precise instructions to the 
computer. However, all the points mentioned above in regard to natural vs. artificial verbal 
languages also apply to computer languages. 

With the first computer languages, and even with newer languages Uke Pascal and FORTH, 
the guiding principle was to serve the computer. Memory was small. The compiler took up a lot 
of space, as did the editor. Frequently, both could not be resident in the computer at the same 
time, and neither could be resident while the program was being run. One had to be kind to the 
computer if one was to get any work out of it at all. Variables had to be declared to make it 
easier on the compiler. Names had to be kept short and be related to the variable types. Pro- 
gram logic had to resemble computer 
logic. 

Languages like LISP, on the other 
hand, are specifically designed to be 
huge and complex interpreters which 
serve the user, at the expense of 
memory and time. Languages like 
LISP, and its offspring LOGO, are 
now possible since even microcom- 
puters have as much user memory as 
the main frames of a couple of decades 



**/45 the speed and power of the computer 
and the size of memory grow, and as human 
time becomes more expensive, it makes less 
sense to force the user to serve the computer, 
rather than have the computer serve the 
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ago. With the ability to use virtual memory, i.e., having most of the program stored on disk, 
with parts to be called up as necessary, even larger interpreters and compilers are possible. The 
whole program can exceed the memory capacity of the computer itself (as my word-processing 
software does). 

As the speed and power of the computer and the size of memory grow, and as human time 
becomes more expensive, it makes less sense to force the user to serve the computer, rather than 
have the computer serve the user. We have more valuable things to do than convert our instruc- 
tions into Machine Language, or to follow artificial grammars designed to please a compiler. 
Computer languages don't have to serve the compiler any more. Consider the 
following dialogue, taken from the October, 1982 issue of Scientific American. It 
is part of a run of the program called SHRDLU, an experiment in artifical 
intelligence, in which a graphics terminal shows a picture of blocks and pyramids 
of various sizes and colors, in various places on the table. The itaUcized sentences 
are "spoken" by the computer, in response to instructions from the operator, working at a 
keyboard. 

Will you please stack up both of the red blocks and either a green cube or a pyramid? 

OK. 

Which cube is sitting on the table? 

The large green one which supports the red pyramid. 

Put a small cube onto the green cube which supports a pyramid. 

OK. 

Put the littlest pyramid on top of it. 

OK. 

How many things are on top of green cubes? 

I'm not sure what you mean by "on top of" in the phrase "On top of green cubes. " Do you 

mean: 1) Directly on the surface, or 2) Anywhere on top of? 

2 (anywhere on top) 

Three of them. 

Had you touched any pyramid before you put the green one on the Uttle cube? 

Yes, the green one. 

When did you pick it up? 

While I was stacking the red cube, the large red block and a large green cube. 

continued on page 26 
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ATARI 

n 400 COMPUTER 

n 800 COMPUTER 

n B10 DISK DRIVE 

n 110 CASSETTE SECORDIH 

D 850 INTERFACE MOD , , 

D PAC MAN (CART) :.........,. 

D CENTIPEDE [CART) 

D CAVERNS Of MARS {DISK) 

D STAR RAIDERS (CAHT| ......:.„ 

D SPACE INVADERS (CART) 

D ASTEROIDS [CART) 

D MISSILE COMMAND (CART) 

D JOYSTICKS ( PAIR) (ACCS) 

a PADDLES (PAIR) (ACCSl 

O G0LDEDIT1OM 1-12(DISK&CASS)(WHILETHEYLAST) 

D ADVENTURES M2(CASS) 24.95 m 

D LUNAR LANDER (CASS) 

D STAR FLITE (DISK) 

D REAR GUARD (DISK) 

n GALACTIC EMPIRE (CASS) .................. 

a GALACTIC TRADER (CASS)... « 

a PREPPIE(DISK) 

n PREPPIE (CASS) .;......;...... 

D TEMPLE OF APSHAI (DISKS CASS) ... 

n STAR WARRIOR (DISK & CASS) 

n RESCUE AT RIGEL(DISK & CASS) 

D OATESTDNEOFRYN (DISK & CASS) 

D CRUSH, CRUMBLE & CHOMP(DISK) 

D INVASION ORION [DISK & CASS) 

D UPPER REACHES OF APSHAI 

D CURSEOFRA 

D CRYPTS OF TERROR (DISX) „ 

n CRYPTS OF TERROR (CASS] 

D EMPIRE OF THE OVERMIND (DISK) 

D TANKTICS (CASS) 

D CONTROLLER (DISK) 

D EMPIRE OFTHE OVERMINO (DISK) 

a EMPIRE OF THE OVERMIND (CASS) 

O SHAMUS (DISKS CASS) 

a MASTER TYPE (CASS) 

D BASKETBALL (CART) 

D SUPER BREAKOUT (CABT) 

n SCRAM (CASS) 

D TOUCH TYPING (CASS) 

D WAILING LIST (CASS] 

D MACRO ASSEMBLER S, TEXT EDITOR 

D ASSEMBLER 

n FILE MANAGER 800 (DISK) 

□ DISK MANAGER (DISK)..- 

□ MICRO PAINTER (DISK) 

D GRAPHIS MASTER (DISK) 

n SAMMY THE SEA SERPENT (DISK S CASS) 

D PAGE 6(DISK) 

D DISK DETECTIVE (DISK) 

D PATH FINDER (DISK) 

D SPEED READ PLUS (DISK) 

D SPACE EGGS [DISK) 

D GALAXY(DISK) 

D B-1 NUCLEAR BOMBER (CASS) 

D MIDWAY CAMPAIGN [CASS) 

D NORTH ATLANTIC CONVOY RAIDER (CASS) 

n NUKEWAR (CASS) 

n CONFLICT 2500 (CASS) 

a LORDS OF KARMA (CASS) 

n APPLE PANIC (DISK) 

D RASTER BLASTER (DISK) 

a BUG ATTACK (DISK) , 

n CANYON CLIMBER(DISK&CASS) , 

n LESTICK(ACCS) 

D PACIFIC COAST HIGHWAY (DISK & CASS) 

D INTRUDER (DISK) - 

O INTRUDER (CASS) 

O SHOOTING ARCADE (DISKS CASS) 

D TRACK ATTACK (DISK) 

D CLOWNS& BALLOONS (DISKS CASS) 

D MEGALEGS (DISK & CASS) (WHILE THEY UST) 

D COMPU-READ (DISK) 

D COMPU-MATH/FRACTIONS (DISK) 

n COMPU-MATH/DECIMALS [DISK) 

n COMPU-MATH/FRACTIONS (CASS) 

D COMPU-MATH/DECIMALS (CASS) 

D MATCH RACERS (DISK) 

P PATHFINDER (AVAIL. FALL) (DISK) 

n DEADLINE (DISK) 

D ZORKI(OISK) 

□ ZORKII(DISK) , 

D POOL 400 (CART) , 

D ACTION QUEST (DISKS, CASS) 

D K-RAZV SHOOTOUT (CART) 

n SPEED READ PLUS (DISK) 

D HI-RES ADV. to- MISSION: ASTEROID (DISK) 

D HI-RES AOV l»2-WIZ& PRINCESS (DISK) 

D CROSSFIRE (DISK) 

D JAWBREAKER (DISK* CASS) 

D THRESHOLD (DISK) 

D THE NEXT STEP (DISK) 
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n ALI BABA AND THE FORTY THIEVES (DISK) 32.95 

a DELUXE INVADERS (DISK) 34.95 

n GALACTIC CHASE (DISK) 29.95 

D GALACTIC CHASE (CASS) 24.95 

D THE SHATTERED ALLIANCE (DISK) 39.95 

D PROTECTOR (DISK & CASS) 34.95 

n CHICKEN (DISKS CASS) 34.95 

D DODGE RACER (DISKS CASS) 24.95 

D WARLOCK'S REVENGE (DISK) 35.00 

D WORDRACE (DISK) 24.95 

D ALIEN SWARM (DISK) 34.95 
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n LOST COLONY (DISK) 29,95 NOW 

D TEMPLE OF APSHAI (DISK) 39.95 NOW 

n GALAXY (DISK) 25.00 NOW 

D MIDWAY CAMPAIGN (DISK) 21.00 Now 

D COMPUTER STOCKS AND BONOS (DISK) 25.00 Now 

VOYAGER (DISK) 25-00 Now 

DRAW POKER (DISK) 21.00 Now 

CHAMPIONSHIP BLACKJACK (AVAIL JULY) (DISK) 39.95 Now 

THE HOME ACCOUNTANT PLUS (DISK) 150.00 Now 

WRITE-ON (DISK) 129.95 Now 

EASy (EXECUTIVE ACCOUNTING SYSTEM) (DISK) 725.00 Now 

DEADLINE (DISK) - - 49.96 Now 

ZORKI(DISK) 39 96 Now 

70RKII[DISK) 39 96 Now 

T l,M 111 (DISK) 495,00 Now 

("ToW IntarrnilfcHi Miiugtiiwiit") 

a MATHEMAGIC(mSK) 89,86 Now 

D EASY SPELLER (DISK) 175.00 Now 

a EASY FILER (DISK) -- 400.00 Now 

a EASYWRITER II (DISK) 360-00 Now 

n THE TAX MANAGER (DISK) 250-00 Now 

□ WORDSTAR [DISK) 495.00 No* 

D MAILMERGE(DISK) 150.00 Now 

□ CONQUEST (AVAIL JULY) (DISK) 29.95 Now 

a SUPERCALC [DISKI 295.00 Now 

D SUPERWRITER (AVAIL JULY) (DISK) 395.00 Now 

D IBM JOYSTICKS (ACCS) 64.95 Now 

a GRAPHICS HARDCDPY SYSTEM (DISK) 24.95 Now 

D VEBSAWHITER GRAPHICS TABLET (ACCS) 299.00 Now 

D DESKTOP PLAN M DISK) 300.00 Now 

D VISITREND/PLOT (AVAIL JULY) (DISK) 300.00 Now 

RAM FOR ATARI 400 +^0 

48K (Reg. $299.00) NOW $149.00 

32K (Reg. $199.00) NOW $75.00 
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Alternatives To BASIC continued 

Why? 

To get rid of it. 

Why did you do that. 

To clear off the red cube. 

Why did you clear off that cube? 

To put it on a large green cube. 

Why did you do that? 

To stack up the red cube, a large red block, and a large green cube. 

Why did you do that? 

Because you asked me to. 

While SHRDLU is not a programming language, a language compiler or interpreter could be 
written to permit the kind of dialogue seen above, even in the process of programming. 



**Right now there is little public awareness 
of the specific purpose of any particular 
language. We use BASIC because it is 
there; or FORTRAN or Pascal because 
that's what we've been taught..." 
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The Importance Of Purposes 

Science fiction stories deaUng with advanced computers frequently show the user speaking to 
the machine in SHRDLU-Uke language, sometimes even calUng it programming. It certainly is 
user-friendly, but is a long way in the future. Until then, we have to work with what we have. 
One thing to consider, until the truly universal computer language is designed (or "grown") is 
the purpose of the language. 

This is one of the most important considerations in looking for alternatives. It is fatal to try 
to handle strings with FORTRAN, which was designed for mathematical and engineering pur- 
poses — "number crunching." It is 
futile to try to use COBOL for quick 
and dirty programming, since writing 
the code takes longer than solving the 
problem by hand. It is hopeless to try 
to learn programming by studying 
APL, which has the most compact and 
unintelligible code of any in existence. 
Right now there is little public 
awareness of the specific purpose of 
any particular language. We use BASIC because it is there; or FORTRAN or Pascal because 
that's what we've been taught and are familiar with; or assembler because our prime purpose is 
to control the computer, or because we don't know any better, or because a high level language 
is not available for that computer, or... 

BASIC, of course, was designed for easy use on a time sharing system, though it is much 
more than that. In its early days, that was all it was good for. A major text, Progamming 
Languages: History and Fundamentals, by Jean E. Sammit, Prentice Hall, 1969, gives detailed 
descriptions of every computer language which existed at the time, including differences in 
grammar, structure, uses, and so on. It devotes somewhat less than three pages out of 785 to 
BASIC. The fact that BASIC has since grown is another matter. Originally, it was almost 
trivial. 

Pascal was designed as a teaching language, to enforce good programming habits 
in computer science students, according to the theories of structured 
programming. Once mastered, most other languages should be relatively easy to 
learn. But computer science students are going to be working on main frames, or 
at least large minis, not micros, for the most part. Pascal, however, is almost 

never used in commercial applications outside the micro industry. Also, compare the idealism 
of Pascal with the real life described in Soul of a New Machine, by Tracy Kidder. 

FORTH was designed for machine control, originally to operate a large astronomical 
telescope. As it turns out, it is also a superb graphics language. However, its structure is quite 
different from any other language. It uses Reverse Polish Notation (like a Hewlett-Packard 
calculator), and is not at all easy to learn. For the kinds of tasks it was designed to handle, it is 
quite good. But you couldn't teach a secretary to do business programming with it. 

C is a systems language, for writing operating systems, compilers, monitors, etc. It is a "mid- 
level" language, more nearly like assembler in its logic and syntax than like high level languages 
such as FORTRAN, which tries to simulate algebraic logic, or COBOL, which tries to resemble 
English. Its main strength is that it gives the user complete control of the computer. It is easier 
to use than assembly, and can be extended to suit any task. 

LOGO, in spite of the dreams of its writers, is designed to familiarize children with computer 
logic and power. It's a good language in that it is user-oriented, as BASIC is randomly becom- 
ing, rather than machine oriented as are Pascal, C, and FORTH. (Its parent language, LISP, is 
another language of high power for Artificial Intelligence, but is as difficult to learn as 
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FORTH.) LOGO lacks a certain degree of power and computational sophistication, though it is 
not a trivial language, as BASIC once was. 

At least at the outset, each language was designed for a specific purpose. The prob- 
lem arises when such a language is used for, or touted to be useful for, other pur- 
poses than those for which it was designed. In selecting an alternative to BASIC, 
then, one must consider what one wants to do with the computer. One cannot ex- 
pect an engineering language hke APL to perform the same kinds of tasks as a hst 
processing language like SNOBOL. 



"While our general, all purpose, alternative 
to BASIC should be designed, it should 
also have the flexibility to grow into new 
needs and uses as time goes on. 



A New Language? 

The first thing, then, is to define the purpose of the language. Let us not, hke the designers of 
PL/I and ADA, decide that we are going to design the general, all purpose, for-all-time 
language. That is not possible, since we have no way of knowing today what need we'll have for 
such a language tomorrow. Let us instead be less ambitious. Let us concentrate on generality 
rather than all-inclusiveness. 

Currently, the most popular alternative to BASIC is Pascal, which claims to be universal, 
structured, and powerful. Its universality is weakened by the fact that there are at least five, 
more or less incompatible, dialects on the market, and more are Ukely to come. It is structured, 
forcing good programming habits on the programmer, according to the definitions of the 
designers of the language, which may not be compatible with the philosophy of the individual 
programmer. Its power is hampered by a reported weakness in its I/O capability. Still, it is 
taught in college computer classes, and is widely available on the market for most 
microcomputers. 

To be fair, FORTH, LOGO, and C 
all suffer from different weaknesses 
which are equally disqualifying as a 
truly suitable alternative to BASIC. If 
we are to have such an alternative, it 
should be less specialized than any of 
those other languages. That is, it 
should be a general, all-purpose 
language. It should be designed specifically, not just allowed to develop randomly as BASIC 
has, and should probably have the following features: 

♦While our general, all purpose, alternative to BASIC should be designed, it should also have 
the flexibility to grow into new needs and uses as time goes on. As the general course of com- 
puter use evolves, the language should be able to evolve with it, rather than having to be re- 
placed. It should be built on a common kernal, which interfaces the machine and the com- 
piler/interpreter, so that different versions can run on the same machine, and programs written 
on one machine can be run on another without translation by hand. (FORTH, C, and Pascal 
are trying to do this, and succeeding to various extents.) 

*It should be easy to learn. The student should not have to assimilate the entire language in one 
lump before being able to program with it. LOGO is Uke that. Given three or four commands, 
one can do things with LOGO, right now. This encourages further learning. The elements of the 
language should be linked together in such a way that one leads to the other, naturally. 
*It should be easy to use. Questions of format, file management, command and function use 
should be answered by the compiler/interpreter itself. For example, old FORTRAN requires 
the programmer to specify every detail of how a print-out will be typed on the page. BASIC 
assumes much of that task, though it allows the programmer to change the defaults. In other 
words, don't make the programmer do it if the computer can. 

*It should be interactive, which means two things: 1) the programs allow the user to enter data 
during the run of a program, as BASIC and LOGO do; 2) the interpreter/compiler check on 
syntax and programming errors as they are being entered, not after the program is compiled or 
run, as do most languages. 

♦It should be extensible. It should be possible for the user to add commands, functions, and 
procedures to the language itself. Possible in FORTH and C, this allows the language to be 
quite general, but permits a user to make the language suit his or her specific needs. The inter- 
preter/compiler should then be able to incorporate the definitions of such extensions into the 
program itself, so that it could be run on any other machine which also uses the language. 

Our ideal alternative to BASIC will not perform a specific set of complicated tasks. Rather, it 
will do a large number of elementary tasks easily and quickly, as FORTH and LOGO do, saving 
the specialized problems for specialized languages. Most of us, after all, do not write data base 
management systems, solve high order equations of the trajectory of the moon, or investigate 
the depths of artificial intelligence. Tasks of this sort do need specialized languages, and cannot 
really be done with BASIC or any reasonable alternative. 
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An analogy is the personal automobile. It is a general, all-purpose machine. It does not carry 
many people. It moves pianos or firewood with difficulty. It isn't all that fast, can't float or fly. 
It can certainly stand improvement, as our day-to-day needs for transportation change. We hire 
special vehicles for these special purposes, for which an automobile is unsuited. But the car 
serves us for ninety percent of our around-the-town use. Our ideal alternative to BASIC should 
be like the ideal car, neither a formula racer nor a dump truck. 

Ease of use is not one of the things found in most of the currently available alternatives to 
BASIC. Pascal /orces you to write "good code," according to someone else's definition of the 
term. FORTH is backwards and not at all human-like. C is mid-level, strictly mathematical, 
and large. 

LOGO, as an exception, is certainly easy, and has lovely graphics, but I doubt that its 
sophistication will encourage its use by serious programmers. One hopes, however, that the 
philosophy of the LOGO designers, that the language should serve the user, not the computer, 
will become more popular. But LOGO is not an all-purpose, general language — - it is another 
instructional language. 

Generality of function and ease of use cannot be achieved in one step. If they could be, the 
first version of BASIC would have been what the best current version of BASIC is now, and 
more. It is only by trial and error, constant use and refining, that the "perfect" language can be 
developed. 

Part of that perfection must be, then, the ability to grow as new uses and needs are perceived, 

and the ability to drop old functions as they are superceded, improved on, or found 

superfluous. (Many early versions of BASIC had MAT, or matrix statements. Nested FOR 

statements accomplish the same thing.) Therefore, rather than designing a whole language, or a 

■ specific language, what we need is to 



''There are also good reasons to assume 
that BASIC is now, and will continue to 
be, the best language of choice for the 
general public. It is being improved all the 
time. It is a living language, not a dead 
one, and that characteristic should be 
retained. Each other language meets 
specific requirements. Only BASIC is 
general enough..." 



design our goals for a language. 
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Why An Alternative? 

It seems, at this moment, that 
BASIC (as a group of dialects, not as a 
single specific language) is working in 
this direction. It is extremely general. 
New functions are being added all the 
time. Useless ones are being trimmed 
out. The very existence of multiple ver- 
sions means that it is not stable (though 
perhaps it should be given a more 
stable kernel), which allows growth 
and change. 

The EngUsh language grows and 

changes, and the best all-purpose computer language should do likewise, in my opinion. Users, 
by their sheer numbers and economic pressure, force these changes on the computer writers and 
suppliers. 

It is certainly worthwhile, however, to continue to create new languages with new features 
and abilities, because only in that way can worthwhile new aspects of the "perfect common 
language" be discovered and tried out in the field. It would also be worthwhile to design that 
"kernel" for BASIC, so that various dialects could be run on the same machine, without the 
need for translation by hand. 

So, in the search for an alternative to BASIC, we arrive at an interesting question 
— why do we need one? The version of BASIC in the Commodore SuperPet is 
reportedly the Danish national programming language. A version at Caltech was 
designed for management use, and is the preferred language for their non- 
engineers. Yet, as I've indicated above, there are some good reasons for an alter- 
native, having to do with specificity of purpose. 
There are also good reaons to assume that BASIC is now, and will continue to be, the best 
language of choice for the general public. It is being improved all the time. It is a living 
language, not a dead one, and that characteristic should be retained. Each other language meets 
specific requirements. Only BASIC is general enough that it has no specific requirements. 

You don't talk math with your landlord, or Latin with the local cop. You use English. 
BASIC is, in may ways, the equivalent of English among computer languages. Like English, it 
can be used badly, deceitfully, or unintelligibly. But that is the fault of the user, not the 
language. Like English, it will grow. If we are intelligent and educated, we can help it, simply by 
using it. © 
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TheArma 
Design Group 
Proudly Announces 

DiskprinL 

If you're using a computer with one or more disk drives, have we got 
a product for you! 

DISKPRINT is beyond a doubt the most useful new package to 
become available since the computer revolution began. 
DISKPRINT will forever free you from having to search for or 
through that looseleaf binder with all your disk directories listed (if 
you have one!), or having to spend valuable minutes or hours scann- 
ing through each disk directory on-screen looking for that one par- 
ticular program. DISKPRINT does for you what your computer was 
supposed to do for you, it eliminates the drudgery of paper shuffling 
and wasted time. 
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HERE'S HOW 
DISKPRINT WORKS. . . 

Simply insert DISKPRINT into one of your 
disk drives and power up the system. 
DISKPRINT is self-booting and will load and 
run automatically. Now load our DISKPRINT 
custom forms into your printer and switch it 
on. Insert any disk in your library into your 
drive and answer the two prompts (which drive 
and disk title). If you do not choose to title your 
disk, DISKPRINT will default to its own. Press 
(RETURN) and DISKPRINT will print out a 
listing of every program on the disk along with 
extensions ana sectors used as well as the 
number of free sectors available. This whole pro- 
cess will take about 20 or 30 seconds of your 
valuable time, so you can run through a one- 
hundred disk library in about 45 minutes or so. 
After your form has been printed advance the 
next form to the print bar, insert another disc 
and go again. When you have run through your 
library, simply remove the tractor strips from 
the forms and insert them in the jackets with the 
disks. Every disk in your library will have a 
printed directory in the jacket with it at all 
times! 

DISKPRINT is delivered with our program on 
disk, 50 custom DISKPRINT forms and com- 
plete instructions. Refill packs of 50 forms each 
are available at your local dealer or directly 
from us by mail (An order form is enclosed) 
DISKPRINT is currently availblefor: 
• ATARI 400/800 & ATARI 825 or EPSON 
MX Series Printers • IBM-PC & IBM or EPSON 
MX Series Printers • APPLE II/APPLE 11+ & 
EPSON MX Series Printers • TRS 80 Models 
I/III & TRS Series Printers • CMB 4032/8032 
& CMB/EPSON MX Series Printers 
DISKPRINT is now being converted to run on 
many more makes and models of computers. 
Call or write for further information. 

COMPLETE DISKPRINT KIT FOR ALL 

MACHINES $24.93 

Refill Packs of 50 Custom Forms $8.95 

Please add $L50 per order for P&H 



ARMA DESIGN GROUP 

'We make the computer revolution 
a little less revolting." ® 
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DON'T ASK PROVIDES THE MISSING LINKS 

o-o> the link between your modem and the outside world. For hassle-free 
communications, phone right in with TELETARI, The Fnendly Terminal. 




Your Atari has never had such easy access to the whole world of telecommunications - bulletin boards, news reports, large time- 
sharing computers, the works. Now it's a snap to tap into all these, and it's just as easy to transfer your program or text files to and from a 
remote computer. Meet TELETARI, The Friendly Terminal. It's just what your modem needs: a powerful, adaptable telecommunications 
package that's a cinch to use. With TELETARI, you simply choose the desired communications function from a menu. Commonly used 
terminal parameters are included in the program, but you can change them to suit your needs with a couple of keystrokes, using another 
handy menu, and store the ones you plan to use again. TELETARI's generous buffer stores up to 20K, so you can review, print, or save 
received information long after you've hung up the phone. You never knew using a modem could be so convenient. Because it's very 
flexible, TELETARI is compatible with most modems and a wide variety of computers. And because it works through the RS 232 port, 
TELETARI is not limited to modem/telephone uses. Put it to work in any RS232 application your imagination can devise - even operating a 
laser disk! 

• buffer of up to 20K • menu-driven • highly adaptable • supports all 850 options 

• compatible with 1200 baud modems and BiT 3 Full-view 80'" board • suitable for any RS232 application 

$39.95 Requires Basic, 32K RAM, disl<, 850 Interface 



O-O^ the link between BASIC and arcade-style graphics. Draw and animate pictures for your own BASIC games 
and other programs with pm ANIMATOR. Create running men, flying rockets, moving figures of all kinds. 




Conning soon 
from DON'T ASK. 



BASIC programmers, pm ANIMATOR puts the power of 
Player-Missile Graphics at your fingertips. 



$34.95 



Requires 32K RAM, BASIC, disk. 



To order direct from Don't Ask, send a check or money 
order, or call to order COD. Add $2.00 for shipping and 
handling. California residents add 6% sales tax (6.5% if 
you reside in L.A. County). 



0-0> tlie linl< between fast game action and verbal learning: 
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Kids and adults, increase yourvocabularywtiile you conn pete In this 
exciting word game. 
Disk version: 

3 levels of play - Beginner, Regular, Ctiallenge 

Requires 32K RAM, disk, BASIC. $24.95 
Cassette version: 

2 levels of play - Beginner, Intermediate 

Requires 1 6K HAM, cassette, BASIC. $ 1 9.95 

turn WORDRACE into a history game or a famous athletes 
game, and get more vocabulary words, with the WORDRACE 
accessory disk: CLAIfvl TO FAME/SPORTS DERBY. 3 new games in 
all. 
Disk only. Requires WORDRACE disk. $19.95 



Atari IS a !rademaf1< ot Atari. Inc. Fuii-view 80 is a trademarlf o! ST 3 Computer Ckxpofation. 




O-O^ the link between you 

and what your Atari Is 

really thinking: 

AeiSE 

the insult-exchange program. 
Have you cursed out your computer? Now 
it can understand you and answer Ijack! 
Requires 40K RAM, BASIC, disk. $1 9.95 
Release your aggressions! Inflict ABUSE 
on anyone who's got it comingi 



DON'T ASK 

0-0> the link between technical excellence 
and the fun of computing. Why do we give 
you so much? Don't Ask. 



DCDRfTASK 

COMPUTIR SOFTWARE 



2265 Westwood BL, Ste. B-150 

Los Angeles, CA 90064 
(213)475-4583 or 397-8811 



GENERAL INFORMATION 

Concerning SoftSide line 
listings, SWAT & Magnetic Media 



Follow these procedures unless otherwise 
instructed by the documentation in the 
magazine. Back issues may differ in some 
details. 

^FF^r TABLES 

At the conclusion of each line listing of a 
SoftSide program, we include a SWAT 
{Strategic Weapon Against Typos) Table. 
SWATv/as published in issue #30 of Soft- 
Side and is available as a free reprint. Please 
send a self-addressed, stamped envelope to 
SoftSide PubUcations, Inc., Dept. SWAT, 
6 South Street, Milford, NH 03055. 

APPLE™ 

Disks are in 16-sector format, created 
under DOS 3.3. To use, just boot the disk. 
A cover/menu program will run 
automatically. 

Tapes LOAD in the normal manner. Ad- 
vance the tape to the beginning of the lead- 
in tone; stop the tape; insert the plug into 
the EAR jack; type LOAD; start the tape; 
and press RETURN. Side two of the tape is 
a duplicate of side one, unless one or more 
Integer BASIC programs are included, in 
which case side two contains the Integer 
programs. 

ATAM® 

Line Listings use the following conven- 
tions in representing unprintable 
characters, unless otherwise noted: 

Characters (including blank spaces) 
which are underUned should be typed in in- 
verse video. 

When graphics or control characters are 
to be included in a string (between quota- 
tion marks), it will be noted in a nearby 
REMark. In such cases, graphics characters 
are represented by the corresponding lower- 
case letter, and control characters are 
represented by the corresponding unshifted 
key symbol. For example: The lower-case 
letter s represents a graphics cross, entered 
by holding down the CTRL key and then 
pressing the S key. The symbol = 
represents a control-down-arrow, entered 
by first pressing and releasing the ESC key, 
then holding down the CTRL key and 
pressing the = key. (See Appendix F, and 
the back cover, of the ATARI"^ BASIC 
Reference Manual.) 

The one exception to the above practice is 
that a clear-screen character (ESC 
CTRL-'i ) is represented in listings by a 
right-hand brace, which looks like this: } 

A shifted = is represented in the listings 
by a vertical line with a small gap in it: ' 

SWAT— Before appending SWAT to a 
program in memory, the program to be 
SWATed must first be LISTed to disk or 
cassette (using LIST "D:FILENAME" for 
disk or LIST "C:" for tape). Next, turn the 
computer off, then on again, to clear the 
system and ENTER the program back into 



memory (using ENTER "D:filename" for 
disk or ENTER "C:" for tape). Because of 
the unique method in which ATARI® 
BASIC stores variables in a program, the 
variable table must always be in the same 
order to produce accurate SWAT codes. 
LISTing and ENTERing the program is the 
only known way to rebuild the variable 
table in a specific order so that SWAT 
codes can match. 

Disks do not contain DOS.SYS files, and 
are therefore not bootable by themselves. 
First boot a disk which contains any version 
of DOS, then insert the SoftSide disk and 
RUN "D:COVER" (Adventure of the 
Month — RUN "D:INTRO"). 

Tapes CLOAD in the normal manner. If 
you have difficulty, try this procedure: 

(1) Type POKE 54018,54 and press 
RETURN. 

(2) Turn up the volume on your TV. 

(3) Type CLOAD and press RETURN 
once. 

(4) Press the PLAY button and listen. 

(5) When you hear a steady lead-in tone, 
press RETURN again. 

Side two of the tape is a duplicate of side 

one. 

IBM® PC 

DV is available on individual order. 
There is no CV at this time. 
TRS-80® 

Disks are available in Model I or Model 
III format. They contain the DOS PLUS 
operating system, and a cover program 
which automatically runs upon booting. 
Back issues prior to May, 1982, are 
available only in Model I format, and may 
be converted using the TRSDOS CON- 
VERT utility on a two-drive Model III. 
Older back issues (with Model I TRSDOS) 
require you to enter BASIC and then, type 
RUN "COVER". 

Tapes CLOAD in the normal manner on 
Model I's, and at low speed (500 baud) on 
Model Ill's. The first program is a 
cover/menu program. Side two of the tape 
is a duplicate of side one. 

NOTES ABOUT MAGNETIC MEDIA 

SoftSide disks and tapes are duplicated 
by reliable, professional duplication ser- 
vices; bad copies are very rare. However, 
the trip through the mail occasionally 
wreaks havoc with sensitive magnetic 
media. If, after a reasonable number of 
tries and a careful check and cleaning of 
your equipment, you are not able to load a 
program from a tape or disk, please return 
it to us with an exact description of the 
problem. If we cannot dupUcate the pro- 
blem on our systems, we will advise you 
when we send the replacement copy. 

We use no copy-protection on our media. 
We urge you to make a backup copy of 
every disk or tape as soon as you receive it 
(and at the same time resist the urge to give 
copies to friends). Our replacement policy 
does not extend beyond 30 days. © 
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IBM" PC 



DATA 



by Mark Pelczarski 
IBM® PC version by Fred Condo 

"The formatter in this 

Data Base may be one of 

the most versatile ones 

around. Although there 

are still a few things it 

can 't do, it does a lot that 

many 'professional ' 

databases don't allow. '' 



Data Base is a data-management program for an IBM 
PC with a dislc drive. A printer is highly desirable. 



Running tlie DATA BASE 

The first choice you will be presented with is whether to 
have forty or eighty columns on your display. It is sug- 
gested that you use eighty columns unless that format is 
too difficult to read on your monitor. 

Next, you must decide whether to initialize a new file or 
load an existing file. Specify this choice by pressing "L" or 
"I". The first time you use it, you'll have to initialize a 
file. Thereafter, when you want to access that data, you 
will load the file. Any time you want to create a new file 
with a different type of data, use the initialize option. 
Several different files will fit on a disk, and you can use as 
many different data disks as you like. A few examples of 
files are: a mailing list, (name, address, city, etc.), 
checkbook hst, (to whom, withdrawals, deposits...), and 
an inventory list (stock number, description number, in 
stock, on order, etc.) Whatever records you want to keep 
can usually be stored in this type of database format. 




To initialize a new file, give your file a name. This name 
must be a standard PC DOS file name, without an exten- 
sion. (The program will not accept a name containing an 
extension.) All data files used with the Data Base are 
assigned the extension ".DAT". Then tell the computer 
how many headings you want and their names. An exam- 
ple would be a file named "Address," with six headings: 
Name, Street Address, City, State, Zip Code, and Phone 
Number. You might want to add an extra heading (or 
more) for some kind of code. You might use "Computer" 
for your seventh heading, so you would know what kind of 
computer a particular person owns. 

Your data will be organized into a table. The headings 
will be your column headings, and each row will have one 
set of information across those headings. A set of such in- 
formation is called a record. Once a file has been created, 
any time that you use the database you only have to give 
the file name ("Address" is our example) and all of the in- 
formation will automatically be loaded from the disk. 

To load a file, press "L" rather than "I". You will then 
see a list of all the data files on your diskette. Type the 
name (omit the extension) of the file you wish to load. 



Tlie Main Options 

After initialization or loading, you will be given a list of 
choices for manipulating your database. Here are the 
choices: 

(S) SAVE current data 

(P) PRINT data [to screen or printer] 

(A) ADD a record 

(C) CHANGE a record [such as an address change] 

(D) DELETE a record 
(T) SORT data 

(F) FILES [diskette directory] 

(N) NEW data file [equivalent to quitting and re-runnlng program] 
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(Q) QUIT 

(M) MEMORY left [approximate room left for more data] 
(L) LITTLE (Compressed) print [for the IBM or Epson printer] 
(B) BACK TO Standard print 



Adding A Record 

This is your logical first choice, since, with no data in 
memory, the other options aren't too much fun. Choose 
(A) from the options page and you'll be asked for informa- 
tion to fill each of your headings for one record. After 
you've filled one record, you'll be returned to the options 
page. See the note below about searching and sorting 
numeric fields, if you plan to do such. 



Printing A Record 

First, a few words about the printer options: (L) will set 
your IBM or Epson MX-80 for the compressed mode. (B) 
will set it for the standard print mode. 

To see if your data is really there, type "P" to print your 
record. The program will ask if you want it put in a special 
format (S), or default format (D). Choose (D) for the mo- 
ment. After choosing, you'll be asked if you want it on the 
screen (S) or the printer (P). If you choose the printer, you 
will also be asked to specify the number of copies of each 
record you wish to have printed. This is particularly useful 
for the generation of multiple mailing labels. Then, after 
that choice, a Ust of headings will be displayed, followed 
by the choices "BEGIN" and "Return to Menu." Choose 
the number next to the word "BEGIN" and press 
RETURN. Each record that you have in memory will be 
displayed in sequence. If you're printing them to the 
screen, pressing any key advances to the next record. The 
ESC key returns you to the option page. All the other 
choices mentioned above will be explained under "search- 
ing" and "formatting." 



Searching 

When printing, changing, or deleting records, you have 
the choice of selecting individual items, subsets of your 
data, or the entire set of data. This is done through the 
search routine. When you used the print routine above, 
you chose to print all of the data by selecting "BEGIN" 
before any other choice. Each of the headings is also listed 
at that point, along with "Record Number." By choosing 
the number next to any of the headings or "Record 
Number," you elect to do a search under that heading. 
You are then asked if you want to look for an item that is 
less than or equal, equal, or greater than or equal, to a 
value you'll give. After choosing 1, 2, or 3, respectively, 
you'll be asked for a value for comparison. Example: If 
you want to search for all records with names starting with 
A through G, you want NAME, < ,G, where "G" is the 
value used for comparison. If you want all records from 
■number 20 through the end of the file, you would choose 
RECORD NUMBER, > , 20. 

You also have the option of specifying the beginning of 
a value for comparison. If you wanted all records from 
people whose zip code starts with a "60" (as 60185), you 
can specify ZIP CODE, =,60*. The asterisk says that 
anything may follow. This is also an easy way to find 
records knowing exact information. If you can't spell 
"Pelczarski" (or if you don't like typing) you can try 
"Pel*" and you'll find the record. 



There is also a substring search option. This option 
works only when you select = (choice 2). To use this op- 
tion, begin your specification with an asterisk. Using the 
example above, you might specify "*cz". This would 
cause the program to display the records for all people 
whose names contain "cz" at any position. 

This feature allows you to have a single heading, called, 
for example, "Category," which can be searched for 
several different criteria. 

For instance, a person's category might look hke 
"work/Christmas/BD Feb 12". This would mean that this 
is someone from work, to whom you send a Christmas 
card each year, and whose birthday is on February 12. So 
each Christmas, you would choose "Category" as the 
heading to search, choose the = option, and specify 
"*Christmas" as the search key. Note that your category 
lines need not be in a rigid format. The search just de- 
scribed would work just as well for a category line that 
looks hke "Christraas/BD Feb 12/work". Also note that 
the slashes (/) are optional, but do make the category line 
more legible. 

To start the actual search, you must choose "BEGIN." 
A hidden option here is that you can specify several search 
criteria. You might, for example, want to find everyone in 
your hst whose zip code starts with a "60" and who owns a 
PC. You would specify ZIP CODE, = ,60*, then specify 
COMPUTER, = ,PC, and tell it to begin. The program 
will ask if the item must meet all of the conditions, or any 
of the conditions. "All" would find only those with zip 60 
who also own a PC. "Any" would find everyone with zip 
60, plus everyone owning a PC (technically, everyone with 
zip 60, or owning a PC). Up to eight such criteria may be 
specified, so you may look for everyone whose name starts 
with D through F ( >D and < F), whose zip starts with 9, 
and who owns an Apple and a PC, etc. 



Changing Records 

To change a record, choose (C) from 
After specifying whatever search criteria 
propriate record(s) will be shown on the 
under each heading will then be shown 
the program will wait for you to type "K 
change, or "R" if the remainder of the 
you type "C", you'll be asked for the 
which to replace the old item. 



the options page, 
you want, the ap- 
screen. The items 
in sequence, and 
" to keep, "C" to 
record is okay. If 
information with 



Deleting Records 

After choosing (D) from the options page and going 
through the search steps, you must specify whether you 
want to be prompted to verify deletions. If you choose no 
prompting, then the record(s) in question will be displayed, 
and will automatically be deleted. If you do choose 
prompting, you'll be asked to verify that you want each 
particular record deleted. Type "Y" to delete. Once it's 
deleted, it's gone, so don't omit prompting unless you're 
sure of what you're doing. 



Saving a File 

When you want to sign off for the day (or even for a 
minute), typing (S) from the options page saves your cur- 
rent file on disk. It's an excellent idea, especially with im- 
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portant information, to do this twice using two separate 
disks, with one as a backup. 



Sorting 

The (T) option from the menu allows your items to be 
sorted in ascending or descending order, under any 
heading. Alphabetic items are sorted alphabetically, and 
numeric items are sorted as strings. The latter means that 
numbers don't always sort the way you want. 125, 34, and 
7 will come out in that order because numbers are sorted 
according to the ASCII code of the first character in each. 
To get a true numeric sort, add leading zeros to the max- 
imum number of places, such as 007, 034, and 125. This 
will force proper sequencing. 

Files 

You can get a directory directly from the options page 
by typing (F). 



Switching Data Files 

You can load or create a new file without rerunning the 
program by selecting (N) from the options. Be sure to 
verify that the current file has been saved. 



Formatting Output 

The formatter in this Data Base may be one of the most 
versatile ones around. Although there are still a few things 
it can't do, it does a lot that many "professional" 
databases don't allow. You can specify the exact form in 
which you want each record printed. Each record is printed 
in sequence, meaning that you cannot mix records across a 
page. You can specify which headings are to be printed and 
where, which items are to be printed and where, and what 
(if any) additional character strings should be printed on 
the form. You may want to include your company name, 
an expanded version of a heading instead of the heading 
itself, or just some lines to separate items. 

To create a format, choose the special format option 
when printing. You'll be asked if you want to load or 
create one. The first time, you'll have to create it. Draw 
out exactly what you want printed for your form. You'll be 
telling the computer, line by line, what it looks like. Your 
choices are (1) Heading, (2) Item, (3) Tab, (4) Next line, (5) 
String, and (6) End. Here's one example using the "Ad- 
dress" file I mentioned earlier. The format will print mail- 
ing labels like this: 

Mark Pelczarski 

1206 Kings Circle 

West Chicago, IL 60185 

Here are the format commands (Numerically, my headings 
are 1 Name, 2 Address, 3 City, 4 State, 5 Zip, 6 Phone, 7 
Computer): 



Commands 


What To Type 


Item, Name 


2,1 


Next Line, 1 


4,1 


Item, Address 


2,2 


Next Line, 1 


4,1 


Item, City 


2,3 


Tab, 16 


3,16 


Item, State 


2,4 


Next Line, 1 


4,1 



Commands 

Tab, 12 
Item, Zip 
Next Line, 3 
End 



What To Type 

3,12 
2,5 
4,3 
6 



The "1" after the next line means to skip down one line. 
The "3" at the end skips down three lines before printing 
the next label. Note that none of the actual headings are 
used in this format, and neither is the phone number. 

Another example is a format that will print a separate 
little form for each person in the database. For lack of a 
better example, I'll have the following printed: 



THE FOLLOWING PERSON OWNS A 

PC 

NAME JOE TATE 
PHONE 555-1212 



Here's tlie format to do it: 

String, 

Next line, 1 

String, THE FOLLOWING PERSON OWNS A 

Next Line, 2 

Tab, 9 

Item, Computer 

Next Line, 2 

Heading, Name (Type "1" for lidg. #) 

Tab, 7 

Item, Name (Type "1" for item #) 

Next Line, 1 

Heading, Phone (hdg. #6) 

Tab? 

Item, Phone 

End 

I'll let the top line of the next item to be printed be the 
bottom line for the last, so I can just end the format after 
printing the last item. 

That's all there is to formatting. Play around with it a 
little to see what it does for you. After a format is created, 
you'll be asked to name it, and it will automatically be 
saved to disk. In the future, you'll be able to load it back in 
when you need it. The names for formats work the same 
way as the names for data files, except that the format files 
all have the extension ".FMT". 

One last note on formatting: if you wish to intercalate a 
string into your format (option 5), and this string has 
leading and/or traihng spaces or consists entirely of 
spaces, then type it between quotation marks. For exam- 
ple, " ! ". 



A Few Final Words 

There are a lot of things this Data Base program still 
cannot do, but it is a good introduction for those of you 
who don't know all of what a database program can be 
used for. As yet, it has no real numeric capability; it 
doesn't take advantage of disk capabilities; and some of 
the routines are slow. On the plus side, it has a lot of the 
features you should look for in a database, and if you ever 
decide to shop for one (they're expensive), you'll have an 
idea of the features to consider. I'm amazed that there are 
$200 database programs out there that don't even have 
basic sorting functions; and most only have a rather 
primitive print formatting. 



The Data Base Series is copyrighted, 1981, by Msrit Pelczarski. It may be reprinted with 
written permission from the author. 
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If you don't wish to type this program, it 
Is also Included In this month's SoftSide 
DV. 

Initialization. 

25 KEY OFF: TROFF: SCREEN 0,0,0:«IDTH 40:H 

EREAGAIN=0 

30 DEF FNU$iA$)=CHR*(ASC(A«)+32»(A$>="a" 

ANDA$<="z')) 

35 FOR K=l TO lOsKEY K,"":NEXT K 
40 DEF FNS«iA$)=HID$iA$,l-(VAL(A$)>=0)) 
42 IF HEREA6AIN THEN 101 
45 KIDTH 40!CLS 

50 READ A$:IF A$<>'l" THEN LOCATE VAKAI 
),20-!LEHiAt)-l+(VAL(A$)>9))/2,0!PRINT R 
I6HT»!A«,LEN(A*)-LEN(FNSt(STR$(VftL(A«J>) 
)):FOR DELAY=1 TO 700:NEXT DELAY:GOTO 50 

ELSE FOR DELAY=1 TO 1500:NEXT DELAY 
60 X$="':CLS:«HILE X$<>"E" AND X»<>"F" A 
ND XtO'e" AND X*<>"f":LOCATE 12,1,1:PRI 
NT'Press F or E for WIDTH Forty or Eight 
y."i!X*=INPUT«(l):IIEND:X*=FNU»(X*)!lF XI 
=»E° THEN WIDTH 80 ELSE WIDTH 40 

Change the value of MAX to change the 
maximum number of records allowed. 

101 HAX=300 

More initialization. 

103 CPF=2 

105 DIH CI(7),ClX(7),C2X(7),Ff!5) 
107 LITTLE=0:REH PRINT SIZE 
110 CLOSEiON ERROR GOTO 

112 OPEN "SCRN:' FOR OUTPUT AS 12 

113 OPEN "LPTl:" FOR OUTPUT AS 13 

Load/initialize option. 

115 CLS: LOCATE 1,1,1,0,7:PRINT"(I) Initi 

alize a new data set" 

120 PRINTED Load a previously saved da 

ta set" 

130 A*=FNU$(INPUT$!1)):PRINT A* 

140 IF At="L" THEN 60SUB 1000:60T0 200 

150 IF A$="I" THEN 60SUB 1500: GOTO 200 

160 GOTO 110 



Lines 200-410: Main program loop. 

200 CPF=2:QHAX=1:0N ERROR GOTO 
Display main menu. 

210 CLS:PRINT"(S) SAVE current data" 

220 PRINT" iP) PRINT data" 

230 PRINT" (A) ADD a record' 

240 PRINT" (C) CHANGE a record" 

250 PRINT" (D) DELETE a record" 

260 PRINT" (T) SORT data" 

270 PRINT" (F) FILES" 

280 PRINT" !N) NEW data file" 

290 PRINT" (Ql QUIT" 

292 PRINT" (H) HEHORY left" 

293 PRINT 

294 PRINT"'";NF$;"' contain5"!NI+l;"reco 
rd";:IF NI=0 THEN PRINT"." ELSE PRINT'S, 

a 

295 PRINT:PRINT"Printer Coiwands:" 

296 PRINT" (L) LITTLE (Coipressed) print 

It 

297 PRINT" (B) BACK TO Standard print" 

298 LOCATE ,6,1:C0L0R 0,7: IF LITTLE THEN 
PRINT"CQ«pre5sed print"; 

299 IF NOT LITTLE THEN PRINT'Standard pr 
infi 

300 COLOR 7,0:PRINT" is on." 

Accept and act on commands. 

301 A$=FNUtnNPUT$(!)):PRINT A«:PRINT 
303 IF A*="L" THEN 60SUB 20000:60T0 200 
305 IF A$="B" THEN GOSUB 30000:60T0 200 
310 IF A$="H" THEN GOSUB 50000 

320 IF A$="S" THEN GOSUB 2000: GOTO 200 

330 IF A$="P" THEN GOSUB 3000:60T0 200 

340 IF A$=»A" THEN GOSUB 4000: GOTO 200 

350 IF A$="C" THEN SB=3: GOSUB 8000:60T0 

200 

360 IF At="D" THEN GOSUB 31000:SB=4:FS=1 

! GOSUB 8000: GOTO 200 

370 IF A$="T" THEN GOSUB 7000:B0T0 200 

380 IF AI="F" THEN GOSUB 600:60T0 200 

400 IF A$="e" OR AI="N" THEN 500 

410 GOTO 200 

Quit. 

500 IF SS=1 THEN 540 

510 PRINT"Current file is not saved. ":PR 

INT'Do you still want to quit? <Y/N) ";: 

T$=FNU*(INPUTfn)):PRINT Tt 

520 IF T$="N" THEN 200 

530 IF T$<>"Y" THEN 510 

540 IF A$="N" THEN CLEAR:HEREAGAIN=-1:G0 

TO 30 

550 WIDTH 80:CL0SE:6OSUB 61000:END 
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Display diskette directory. 

600 FILES:PRINT:PRINT"Hit a key.'pLOCAT 
E ,,1:A$=INPUT»(1):RETURN 

Load a data file. 

999 REH LOAD SUBROUTINE VERS.l 

1000 PRINTiON ERROR GOTO 1002:FILES "l.d 
at":PRINT:LINE INPUT'File nate? ■;FI:IF 
INSTR(F«,".")<>0 THEN 1000 ELSE UP$=F$:G 
OSUB 51000; Ff=UP$: GOTO 1005 

1002 PRINT:PRINT"No data files on this d 

iskette.":PRINT"Pre5s any key.";:LOCATE 

,,1:A*=INPUT*(1):RESUHE 110 

1005 NF*=F$ 

1010 ON ERROR GOTO 1310 

1015 OPEN F*+".DAT" FOR INPUT AS fhCLOS 

E #1:REH Verify presence of file. 

1020 OPEN F*+".DAT" FOR INPUT AS «! 

1040 INPUT «1,NH! INPUT II, NI 

1130 DIH H$(NH),I$(HAX,NH) 

1140 FOR 1=0 TO NH:LINE INPUT #l,H$a)!N 

EXT 

1200 IF NI=-1 THEN 1280 

1240 FOR 1=0 TO NI 

1250 FOR J=0 TO NH 

1260 LINE INPUT il,I$(I,J) 

1270 NEXT J: NEXT I 

1280 CLOSE II 

1300 SS=1: RETURN 

1310 PRINT»File not found. •:PRINT"Press 

any key.";:LOCATE ,,1:A»=INPUT$(1) 

1320 RESUHE 110 

Initialize a data file. 

1499 REH INITIALIZE SUBROUTINE VERS.l 

1500 LINE INPUT"6ive your file a nam: " 
iFf:IF INSTR(F$,".")<>0 THEN 1500 ELSE U 
P$=F$:GOSUB 51000:F$=UPf 

1510 IF F$="" THEN 1500 
1515 NF$=F* 

1520 INPUT'How lany headings'iNH 
1530 IF NH<1 THEN 1520 
1540 NH=NH-liNI=-l 
1560 DIH H$(NH),I$(HAX,NH) 
1570 FOR 1=0 TO NH 

1580 PRINT"Heading »";I+l!:LINE INPUT" : 
";H*iI) 
1590 NEXT I 
1600 SS=0: RETURN 

Save a data file on diskette. 

1999 REH SAVE SUBROUTINE 

2000 PRINT"Use '"iF«;"' as naiie (Y/N)?"; 
:A«=FNU*(INPUT$(1)):PRINT At 

2050 IF At="Y" THEN 2090 

2060 IF fltO'N" THEN 2000 

2070 LINE INPUT"Na«e? "iFt:UP$=F«:GOSUB 

51000: Ft=UP$:NF»=F* 
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2080 IF F*="" THEN 2070 

2090 ON ERROR 60T0 2290 

2100 OPEN F$+".DAT» FOR OUTPUT AS llsCLO 

SE #l!KILL FI+".DAT" 

2107 OPEN F$+M)AT' FOR OUTPUT AS #1 

2120 PRINT il.NHsPRINT il,NI 

2130 FOR 1=0 TO NH 

2140 PRINT ll,H»(I) 

2150 NEXT 

2220 IF NI=-1 THEN 2270 

2230 FOR 1=0 TO NI 

2240 FOR J=0 TO NH 

2250 PRINT il,I«a,J) 

2260 NEXT J: NEXT I 

2270 CLOSE #1 

2280 SS=1: RETURN 

2290 PRINT'Disk error. Hit any key,":At= 

INPUTtfDsRESUHE 200 

Print records. 

2999 REH PRINT SUBROUTINE 

3000 IF NI=-1 THEN 60SUB 9000:RETURN 

3005 PRINT" (S) SELECT foriat, or (D) OEF 
AULT ";:A»=FNU«(INPUT*n)):PRINT A$ 

3006 IF A$="S' THEN 60SUB 10000: FS=2!60T 
3010 

3007 IF A$<>"D' THEN 3005 

3008 FS=1 

3010 PRINT" <S) SCREEN, or iP) PRINTER "; 
sLOCATE ,,hAI=FNUt(INPUT$(l)):PRINT A» 
3020 IF A*='P" THEN SB=2!60T0 3050 
3030 IF A$<>'S" THEN 3010 
3040 SB=l! PRINT! PRINT"After each record, 
[ESC] Kill return to"!PRINT"the tern. A 
ny other key continues." 
3050 PRINT'Press any key.": LOCATE ,,l!A$ 
■INPUT$U)iIF SB=2 THEN INPUT'Hom lany c 
opies";6HAX 

3060 IF SB02 THEN QHAX=1 
3070 60SUB 8010 
3090 IF SB=2 THEN CPF=2 
3100 RETURN 

3299 REH PRINT ONE RECORD TO SCREEN, VER 
S.4 

3300 ON FS 60SUB 3700,3800 
3310 IF SB=2 THEN 3350 

3340 IF SB04 THEN LOCATE ,,l!At=INPUTIf 
1)!PRINT!IF A$=CHR*!27) THEN RS=1 
3350 RETURN 

3699 REH PRINT ONE DEFAULT V.l 

3700 IF NOT LITTLE AND SB=2 THEN CPF=3!P 
RINT ICPF,CHRI(18); 

3705 IF LITTLE AND SB=2 THEN CPF=3!PRINT 
#CPF,CHR»(15)i 

3709 FOR QT=1 TO BNAXsPRINT #CPF,:PRINT 
ICPF, "Record"! I+1:PRINT »CPF, 

3710 FOR J=0 TO NH 



3720 PRINT •CPF,H$(J),I*(I,J) 
3730 NEXT J:NEXT ST 
3740 RETURN 

3799 REN PRINT ONE FORMAT V.l 

3800 IF LITTLE AND SB=2 THEN CPF=3! PRINT 
iCPF,CHR«!15); 

3805 IF NOT LITTLE AND SB=2 THEN CPF=3!p 
RINT «CPF,CHR*a8)5 
3810 FOR 9T=1 TO Q«AX!J=l!T=0!B$="" 
3820 Jl=VAL(HID«(F$(T),J,l))!J=Jtl 
3830 IF JK5 THEN N=VAL(HID$(F«(T>,J,2)) 

!j=J+2 

3840 ON Jl eOTO 3850,3860,3870,3890,3910 

,3970 

3850 A$=Ht(N)i60T0 3950 

3860 A*=I»(I,N)!60T0 3950 

3870 B$=LEFT$(B$,N-l)!lF LEN(B«)<N-1 THE 

N FOR J2=LEN(B«) TO N-2:B$=B$+" "jNEXT 

3880 60T0 3960 

3890 PRINT »CPF,Bt:IF N>1 THEN FOR J2=2 

TO NiPRINT #CPF,!NEXT 

3900 B1="":60T0 3960 

3910 IF J>LEN<F$(T)) THEN MH-.M 

3920 J2=J 

3930 IF HID* <F$(T),J2,1 )<>•!" THEN J2=J2 

+l!eOTO 3930 

3940 A»=HID$!F$(T),J,J2-J)!J=J2tl 

3950 B$=B*+A* 

3960 IF J>LEN(F*«T)) THEN T=T+l!J=l 

3965 60T0 3820 

3970 PRINT tCPF,B*!NEXT QTjRETURN 

Add a record. 

3999 REH ADD SUBROUTINE VERS. 2 

4000 SS=0:NI=NI+1 

4005PRINT:PRINT"RBcord";NI+I:PRINT 
4010 FOR J=0 TO NH 

4020 PRINT H$!J)i!LINE INPUT" "iI*{NI,J) 
4030 NEXT J 
4040 RETURN 
Change a record. 

4999 REH CHAN6E SUBROUTINE VERS. 2 

5000 PRINT:PRINT"(C) CHANCE itet, !K) KE 
EP itei, Qr":PRINT"(R) KEEP retainder of 

record." 

5030 PRINT:PRINT"RBCord"iI+l 
5040 CS=1:RS=0!F0R J=0 TO NH 
5050 PRINTiPRINT H»(J)5" : ";I$(I,J)5" " 
;: LOCATE ,,1 

5055 IF RS=1 THEN PRINT! BOTO 5090 
5060 A*=FNU*(INPUT*(1))!PRINT" "jAtilF 
A*<>"C" AND A$<>"K" AND AIO'R" THEN 506 


5070 PRINT A*iIF A*="K" THEN 5090 
5075 IF A*="R" THEN RS=l!60T0 5090 
5080 PRINT HtSJJjiLINE INPUT" : ";I«(I,J 
) 



5085 CS=0 

5090 NEXT J 

5095 RS=0 

5100 IF CS=0 THEN SS=0 

5110 RETURN 

Dfelete records. 

5999 REH DELETE SUBROUTINE VERS. 2 

6000 PRINT: IF NOT PR0HPTIN6 THEN 6100 
6005 PRINT'Delete this record? "!LOCATE 

„i 

6070 A$=FNU*aNPUTt(l))!lF AIO'Y" AND A 

*<>"N" THEN 6070 

6080 PRINT AlilF A»="N" THEN 6150 

6100 FOR 11=1+1 TO NI 

6110 FOR J=0 TO NH 

6120 I«(I1-1,J)=I$(I1,J) 

6130 NEXT J!NEXT II 

6135 FOR J=0 TO NH!li(NI,J)=""!NEXT 

6140 NI=NI-l!SS=0! 1=1-1 

6150 RETURN 

Sort data. 

6999 REH SORT SUBROUTINE VERS.l 

7000 IF NI=-1 THEN 60SUB 9000!RETURN 
7010 PRINT: FOR J=0 TO NH 

7020 PRINT"("5FNS$iSTR$«J+l));") "jHIU) 

7030 NEXT i 

7040 INPUT"Sort on nhich heading" jJl 

7045 J1=J1-1 

7050 IF JKO OR JDNH THEN RETURN 

7060 PRINT" !A) ASCENDIN6, or iD) DESCEND 

INB ": LOCATE ,,1:A*=FNU$ (INPUT* (IDiPRIN 

T A* 

7070 IF A*="A" THEN A=l!BOTO 7100 

7080 IF A*="D" THEN A=2!60T0 7100 

7090 BOTO 7060 

7100 FOR 1=0 TO NI-1 

7110 T=I 

7120 FOR I1=T+1 TO NI 

7122 PRINT I;" "ill 

7125 ON A SOTO 7130,7140 

7130 IF I*(Il,Jl)<It(T,Jl) THEN T=I1 

7135 BOTO 7145 

7140 IF I*ni,Jl)>I*(T,Jl) THEN T=I1 

7145 NEXT II 

7150 IF T=I THEN 7180 

7155 FOR J=0 TO NH 

7160 Tt=I*(T,J)!l*(T,J)=I*fI,J):I*(I,J)= 

T* 

7170 NEXT i 

7180 NEXT I 

7200 SS=0!RETURN 

Search subroutine. 

7999 REM SEARCH SUBROUTINE VERS. 2 

8000 IF NI=-1 THEN 60SUB 9000!RETURN 
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8010 11=0: I2=NI: J=0:ClX(0)=-l!BS=l 


8150 IF J<2 THEN 8200 


8350 IF AS=0 AND BS=1 THEN 8355 


8015 CLS:PRINT"Search criteria: "jPRINT 


8160 LOCATE 22,,1:PRINT"1) Ite« lust lee 


8352 IF ASOl THEN 8380 


8020 PRINT" 0) Record Nuiber" 


t ALL condition5":PRINT»2) Itei eay neet 


8355 GOSUB 3300 


8030 FOR 1=0 TO NH:PRINT I+1;CHR*(29);") 


ANY condition ";:At=INPUT$(l):PRINT A$: 


8365 IF SB=3 THEN 80SUB 5000 


";H$(I);NEn I 


IF A$<"1" OR A$>"2" THEN 8160 


8370 IF SB=4 THEN BOSUB 6000 


8035 PRINT:PRINT NH+2;") BE61N" 


8170 BS=VAL{A*) 


8375 IF RS=1 THEN 13=12 


8036 PRINT NH+3i'» Return to Menu" 


8200 RS=0 


8380 NEXT 13 


8040 LOCATE 21,,hINPUT'Select"iI:IF KO 


8250 I=I1-1:F0R 13=11 TO 12:1=1+1 


8390 CPF=2:PRINT:PRINT:PRINT"That'5 all! 


OR I>NH+3 THEN 8040 


8255 AS=0:FOR J=0 TO 7 


Hit any kBy.":L0CATE ,,1:AI=INPUT$(1): 


8045 IF I=NH+2 THEN C1X«)=-1:60T0 8150 


8260 IF C1X(J)=-1 THEN J=7:e0T0 8345 


PRINT 


8046 IF I=NH+3 THEN RETURN 


8270 ON C2X(J) 60T0 8280,8290,8310 


8400 RETURN 


8050 C1X(J)=I-1 


8280 IF I$iI,ClX(J))<=CI(J) THEN 8330 


Embedded search feature. 


8060 LOCATE 22,,l!PRINT"!l) Sialler !2 


8285 60T0 8340 


8401 REH EHBEDDED STRING SEARCH VER. 1 B 


) Equal (3) Larger »5:A$=INPUT$(1):PRI 


8290 IF I*a,ClX(J))=Cf(J) THEN B330 


V F. CONDO 


NT At: IF A»<"1" OR A$>"3" THEN 8060 


8294 IF LEFTtiC$iJ),l)="»" THEN 8410 


8410 T=LEN!C*y))-l:EHI=RIBHT*!C$(J),T) 


8070 C2X(J)=VAL(A*) 


8295 IF RIBHT$!C$(J),1)<>'»° THEN 8340 


8420 E0=LEN(I*(I,C1X!J))) 


8080 LOCATE 23,,l:PRINT"Co«pared to : '; 


8298 T=LEN(Ciy))-l:IF LEN(I$(I,CU(J))) 


8430 IF E0<T THEN 8340:REH NO HATCH - I 


:IF C1X(J)=-1 THEN 8100 


<T THEN 8340 


TEH TOO SHORT 


8090 LINE INPUT" "iCtUJiJ^J+hlF J>7 TH 


8302 IF LEFTI!I$(I,C1X(J)),T)=LEFT$(CI(J 


8440 EE=E0-T+1 


EN 8160 


),T) THEN 8330 


8450 FOR Z0=1 TO EE 


8095 60T0 8015 


8305 60T0 8340 


8460 IF EH*<>HID«(I$iI,ClX!J)),ZO,T) THE 


8100 INPUT I: IF HI OR I>NH-1 THEN 8100 


8310 IF I*iI,ClXy))>=C$(J) THEN 8330 


N NEXT ZO 


8105 1=1-1 


8320 60T0 8340 


8470 IF Z0=EE+1 THEN 8340: REM NO MATCH 


8110 IF C2Xy)=l THEN 12=1 


8330 IF BS=2 THEN AS=1:J=7 


8480 GOTO e330:REM MATCH 


8120 IF C2Z(J)=2 THEN 11=1:12=1 


8335 eOTO 8345 


Error handler #1. 


8130 IF C2X(J)=3 THEN 11=1 


8340 IF BS=1 THEN AS=2:J=7 


8999 REM ERROR SUBROUTINE #1 


8140 60T0 8015 


8345 NEXT J 


continued on page 3S 



APPLE 
ATARI 



COMPARE OUR PRICES!! 



RanaSystems 




Elite 1 (163K) 
Elite 2 (326K) 
Elite 3 (652K) 



State of the art design 
brings you the most 
advanced Floppy Drive 
available for your Apple II! 
100% Compatible with 
Apple II Disks, Controller, 
Software, CP/M, Pascal. 

W/ Controller W/ O Contoller 

$409.00 $339.00 
$599.00 $509.00 
$729.00 $669.00 




LOGO 



Complete package, with 2 copies of $1 99 95 

KRELL Logo, Utilities disk, Alice in 

Logoland, 4 manuals, wall chart. APPLE II 



ENTERTAINMENT SOFTWARE 



Retail Our Price 

Apple Panic Ap, At, /BM 29,95 20.95 

Arcade Machine Ap 54 95 38.95 

Canyon Climber Ap. At 29,95 20.95 

ChopUfter Ap. At 34,95 24.95 

Crystal Caverns Ap 34,95 24.95 

Dark Crystal Ap 39,95 28.95 

Deadline Ap, At. ;BM, TRS ,,. 49.95 35.95 

Deadly Secrets Ap, At 34.95 24.95 

Dogstar Raiders Ap 29 95 20.95 

Flip Flop Ap 34.95 24.95 

Frosaer Ap. At. IBM 34.95 24.95 

Gold Rush Ap.At 34.95 24.95 



Retail 

Gorl At 39.95 

Knight of Diamonds Ap 34.95 

Pig Pen Ap. At. IBM 29,95 

Prepple At 29,95 

Starcross Ap, At, /BM, TRS ,, 39,95 
Temple of Apshal Ap,AUBM.TRS39,95 

Trivia Trek At 29,95 

Ultima II Ap. At 59,95 

Ulysses & GoUen Fleece A A IBM 34,95 

Wizard of Wor At 39,95 

Wizardry Ap 49,95 

Zork I. II or HI Ap, At. IBM . . 39,95 



BUSINESS, UTILITIES. LANGUAGES 



Controller (1-4 Drives, 3.2 or 3.3) 99.00 



Ampersoft Ap 49,95 35.95 

Atari Basic At Cart 59,95 44.95 

Atari Pilot I Home Pacfcaje) ,, 79,95 59.95 

Basic Compiler Ap.At 99 95 69.95 

Forth II Ap 69.95 49.95 



GraForth II Ap 75.00 

Lisp Interpreter Ap, At 124.95 

Microsoft Basic At 89.95 

QS Forth At 79.95 

TransForth II Ap 125.00 




NEC PC-8023A $459.00 



lOOCPS, 8 Types, 

Graphics, Tractor/ Friction 

Call for Interface Info.!! 



EDUCATIONAL SOFTWARE 



Bumble Games (4-10) Ap ... 60.00 42.95 

Counting Bee (540) Ap 29.95 20.95 

Face Maker (48) Ap, ;BM ,,, 34,95 24.95 

Gertrude's Puzzles (6A) Ap , 75,00 52.95 

Juggle's Rainbow (36) Ap ., 45,00 31.95 

Master Type Ap, At 39,95 27.95 



My First Alphabet (3 6) At ,. 34.95 
Sammy the Sea Serpent (4-9) 23.95 
Snooper Troops I or II Ap,;BIVf 44 95 
Spelling Bee/Primer (5-10) Ap 39,95 
Story Machine (5-9) Ap, (BlVf , 34,95 
Word Race (9-A) Ap 24.95 



Our Price 
29.95 
24.95 
20.95 
20.95 
28.95 
28.95 
20.95 
41.95 
24.95 
29.95 
35.95 

28.95 ea. 



52.95 
87.95 
66.95 
56.95 
87.95 



24.95 
17.95 
31.95 ea. 
27.95 
24.95 
17.95 




REMEMBER 

100% Certified Enror Free, Hub Rings 

ELEPHANT DISKETTES: 23.95/10 
219.50/100 



20-30% 
DISCOUNTS 

Call for Prices 
on new releases 

and items not 
listed. We hai/e it! 



SoftSide 



Most Orders shipped same day. Add $2,00 Shipping (Software) or 3% (Hardware), Add $2,00 tor 
C,0,D,'s (Max $100,00), GA Residents add 6% tax. Personal Checks take 10-15 days to clear 
hank. Foreign orders add 10%, Mln, $10,00, Prices suhject to change without notice. 
Call or write for Free Catalog. Over 1,000 Items at 20-30% Discount. Please Specify Computer. 



% 



Collins Computing 



m 
m 



Box 6424 • San Bernardino, CA 9241 2 
SOURCE ST9386 

CALL: 714-783-3155 • 
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conttnued from page 37 

9000 PRINT"No data is in ieBory," 
9010 FOR 1=1 TO 1000:NEXT:RETURN 

Print formatting. 

9999 REM PRINT FORHATTING, V.l 

10000 IF F$(0)="" THEN 10040 

10010 PRINT"Ba«B fortat? •i!A$=FNU*iIMPU 

Tlfl)):PRINT A* 

10020 IF A*='¥' THEN RETURN 

10030 IF A«<>"N" THEN 10010 

10040 PRINTED LOAD foriat, OR (C) CREA 

TE fornat "!:At=FNU$(INPUT$(l)J:PRINT A$ 

10050 IF A*="C" THEN 10200 

10060 IF A$<>"L' THEN 10040 

10090 ON ERROR GOTO 10170 

10100 PRINTiON ERROR GOTO 10102!FILES "t 

.FHT":PRINT:LINE INPUT'Fornat naw: '',Pii 

:IF INSTR(At,".')<>0 THEN 10100 ELSE UP$ 

=A*!60SUB 51000: A$=UPl! GOTO 10105 

10102 PRINT:PRINT»No foriat files on thi 

s diskette. "jPRINT'Press any key/pLOCA 

TE ,,1:A»=INPUT»(1)!RESUHE 200 

10105 OPEN Af+".FHT» FOR INPUT AS thCLO 

SE #1:REH Sinulate Apple's VERIFY 

10110 OPEN A*+".FHT" FOR INPUT AS #1 

10130 INPUT il,NF 



10140 FOR J=0 TO NFiLINE INPUT «1,FI(J): 

NEKT 

10150 CLOSE II 

10160 RETURN 

10170 IF ERR=24 THEN PRINT'No printer fo 

und.":PRINT"Pre55 any key.'pLOCATE ,,1: 

A*=INPUT*(1):RESUHE 200 ELSE PRINT"FDr«a 

t not found. Press any key.'iLOCATE ,,1: 

A$=INPUT*!1):REBUNE 200 

10200 NF=0:J=0:F$(0)="" 

10210 CLS!pRlNT"Start in the upper left 
corner and nork across each line." 

10220 PRINT"l!Heading, 2:Itei, 3:Tab, 4: 
Next Line,":PRIMT"5:Strinf, 6:End"! INPUT 
Jl 

10230 IF JKl OR Jl>6 THEN 10220 
10240 F$(NF)=Ft(NF)+FNS$(STRI(JlJ):J=J+i 
10250 ON Jl GOTO 10260,10260,10300.10300 
,10350,10400 

10260 FOR T=0 TO NH:PRINT T+l;"l "iH$(T) 
:NEn 

10270 INPUT"»HICH";T!T=T-l!lF T<0 OR T>N 
H THEN 10270 
10280 GOTO 10310 

10300 INPUT'How Bany";T:IF T<1 OR T>99 T 
HEN PRINT"Qut of ranqe.'iBOTO 10300 



10310 ftf=FNS$ (STRUT))! IF T<10 THEN Al=» 

0°+A$ 

10320 Ft(NF)=F*(NF)+A$:J=J+2 

10330 GOTO 10380 

10350 LINE INPUT'String: "jAldF LEFT! (A 

«,1)=CHR$(34) AND RIGHT1(A«,1)=CHR$(34) 

THEN A$=HID»(A$,2,LENiA$)-2)+"!" ELSE A$ 

=A*+'!" 

10360 IF LEN(AI)+J>255 THEN NF=NFtl!J=0: 

F$(NF)=" 

10370 F$(NF)=F*(NF)+A»:J=J+LEN(A$) 

10380 IF J>252 THEN NF=NF+l!J=0:F$(NF)=" 

10390 SOTO 10220 

10400 LINE INPUT'Forsat Naae: «!A$-.UP*=A 

$:GOSUB 51000:A$=UP$ 

10405 ON ERROR GOTO 10460 

10410 OPEN A$+".FNT' FOR OUTPUT AS il 

10430 PRINT #1,NF:F0R J=0 TO NFiPRINT «1 

,Fti.J):NEXT 

10440 CLOSE II 

10450 RETURN 

Error handler #2. 

10460 PRINT"Di5k error. Press any key."; 
LOCATE ,,l:A$=INPUTt(l):RESUHE 10400 
Set printer for compressed print. 
20000 LITTLE=-1:RETURN 



FOOTBALL 
PREDICTOR 



ONLY 3935 




MAKE MONEY WITH YOUR IBM: 

BANKRUPT YOUR BOOKIE 
Predicts Outcomes-Pointspreads- Winners 

CALL NOW (615) 584-9774 
C & C SOFTWARE 

West Bearden Office Piaza 

316 Nancy Lynn Circle - Suite 26B 

Knoxville, Tennessee 37919 

We accept Master Charge, Visa, or COD 



ATARI '^°'"''"*"^ 



and Software 



_j — fflflwiwwianaraB — k 



AXAm 400™ 

u/>lV... ONLY wUlli 

All Other Memory Variations 
In Stock... Call For Prices 



'MY FIRST ALPHABET $23.25 

•EASTERN FRONT $23.25 

'CRUSH, CRUMBLE & CHOMP . .$22.50 

'TEMPLE OF APSHAI $30.00 

'UPPER REACHES OF APSHAI . .$15.00 

'CRYPT OF THE UNDEAD $22.50 

'EMPIRE OF THE OVERMIND .... $22.50 

'CHOPLIFTER $26.25 

'APPLE PANIC $22.50 

'RASTER BLASTER $22.50 

'CANYON CLIMBER $2250 

'DR. GOODCODE'S CAVERN . . . .$22.50 

'DEADLINE $37.50 

'POOL 400 $26.25 

'GHOST ENCOUNTER $22.50 

'K-RAZY SHObTOUT $37.50 

'MEGALEGS $26 25 



'MOUSKATTACK $26.25 

■CROSSFIRE $22.50 

'JAWBREAKER $22.50 

'FROGGER $26.25 

'SNAKE BYTE $22.50 

'CYCLOD $22.50 

'SPACE EGGS $22.50 

'TIGERS IN THE SNOW $30.00 

'PROTECTOR $26.25 

'CHICKEN $26.25 

'SLIME $3.25 

'NAUTILUS $26.25 

'SHAMUS $26.25 

'ALI BABA $24.75 

'CAVERNS OF MARS $31 .00 

'STAR RAIDERS $34.75 



'ATARI MICROSOFT BASIC $70.00 

CASSETTE 'DISK 'BOTH 'CARTRIDGE 

• WE CARRY OVER 30 LIHES • ALSO FOR APPLE & TRS-W 
• SHIPPING CHARGE OF $2" ON SOFTWARE, 2% HARDWARE 
• ALL ORDERS SHIPPED WITHIN 48 HOURS OR WE 
PAY THE FREIGHT • H.Y. RESIDENTS ADD 7% TAX 



il 



'» 10X0311 
Freiloiia, N.r. 
14063 



THE VARIABLE 

Computers Zt Software 

CALL (716) 672-8000 » mam^^pm 



MON.-FRI. 



38 ^r 
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Set printer for standard print. 

30000 LITTLE=0:RETURN 

Set prompting for deletions. 

31000 LINE INPUT'Do you want pro»pting ( 
Y/N)? ";A$:A«=FNU$(LEFTI«ftl,l)):iF ftl^'Y 
» THEN PR0!1PTIN6=-l! RETURN 
31010 IF A$<)"N" THEN 31000 
31020 PROHPTINB=0:RETURN 

Subroutine to display free memory. 

50000 PRINT'You have rooi for":FRE(K$)-5 
O^'iore characters. "iPRINT'Hit a key.";: 
LOCATE „hA$=INPUT$U}!RETURN 

Subroutine to convert file names to all 
upper-case letters. 

51000 IF UPtO" THEN FOR CHAR=1 TO LEN( 
LIP$) :HID*iUP$, CHAR, 1)=FNU«!I1ID*(UP«, CHAR 
jlDiNEKT CHARiRETURN ELSE RETURN 

Data for the title page. 

60000 DATA "SData Base'S^Tby Hark Pelcza 
r5ki","8PC version by Fred Condo"!"20CDp 
yright (c) 1982 by%"2!SoftSide Publicat 
ions, Inc.","#" 



Subroutine to restore the function-key 
definitions upon exit from the program. 

61000 KEY ON:KEY 1,"LIST ":KEY 2,"RUN"+C 
HRt(13);KEY 3, »L0AD"+CHR$(34):KEy 4, "S 



AVE"+CHR»04):KEY 5, "CONTHCHRIIlShKEY 

6, »,"+CHR$(34)+"LPTl:"+CHRt(13):KEY h 

"TR0N"+CHR*!13):KEY 8, "TR0FF"+CHR«(!3) 

iKEY 9, "KEY "jKEY 10, "SCREEN 0,0,0"+CH 

Rf( 13): RETURN © 
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SWAT TABLE FOR: 








DATA BASE 
















SWAT 






SWAT 




LINES 


CODE 


LENGTH 


LINES 


CODE 


LENGTH 


25 - 


103 


Ki 


503 


5085 - 6110 


W 


242 


105 - 


200 


CL 


341 


bl20 - 7045 


HB 


243 


210 - 


294 


IR 


303 


7050 - 7135 


EU 


267 


295 - 


330 


iY. 


360 


7140 - 8015 


JG 


256 


340 - 


540 


i.i 


377 


8020 - 8090 


OF 


423 


550 - 


1140 


AB 


452 


8095 - 8250 


HW 


321 


r.'Ol' - 


1510 


KA 


299 


3255 - 8310 


5R 


334 


1515 - 


2050 


BV 


265 


8320 - 8380 


QN 


190 


20fcO - 


2230 


OU 


267 


3390 - B9'?9 


LT 


363 


1240 - 


3008 


HH 


279 


9000 - 10100 


FD 


396 


3010 - 


3310 


BH 


402 


lOlO: - 10220 


JE 


516 


3340 - 


3800 


OS 


355 


10230 - 10360 


YY 


448 


3805 - 


3910 


ZD 


384 


10370 - 30000 


AH 


305 


3w20 - 


4020 


XN 


268 


31000 - 61000 


NF 


630 


4030 - 


5080 


LI 


370 










CcI«€©OijD /spring '83 

APRIL 28-30, 1983 
WASHINGTON D.C. CONVENTION CENTER 



NATIONAL COMPUTER CONFERENCE AND EXPOSITION FOR EDUCATORS AT ALL LEVELS 



SEMINARS 



HANDS-ON SESSIONS 



MICROCOURSES 



PANELS 



DEMONSTRATIONS 



• SOFTWARE 



DATA MANAGEMENT 



WORD PROCESSING 



HARDWARE • FUNDING 



PROGRAM DESIGN 



BID SPECIFICATION 



INSTRUCTIONAL MANAGEMEN1 



HIGHER EDUCATION APPLICATION 



MATH AND SCIENCE 



MICRO-MINI CONNECTION • TELECOMMUNICATION 



COMPUTER ASSISTED INSTRUCTION 



SIMULATION 



DISTRIBUTED DATA PROCESSING 



PURCHASE AND POLICY • TEACHER TRAINING 



icI'SeffiD /FALL '83 



NOVEMBER 17-19, 1983 
Los Angeles Convention Center 



MAIL TO: Judco Computer Expos. Inc. 

2629 North Scottsdale Road. Suite 201, Scottsdale. Arizona 85257 
(800) 528-2355 

Name 


01 


Address 


Citv 


State ZiD 


1 ! ATTENDEE INFORMATION 
[ ] INFORMATION TO EXHIBfT 
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Translation By 
Fred Condo and 
Kerry Shetline 



OPERATION: 

by Ray Sato 




Operation: Sabotage is s fantasy/adventure game for an 
IBM® PC with 16K RAM. 

It is the year 2101 and war has broken out between Earth 
and the distant planet Zekloke. This alien power has 
established a large military complex on Mars which will 
soon become a great danger to Earth. Hidden in the 
massive installation are several secret documents contain- 
ing the plans for an incredible defense shield — strong 
enough to stop an entire fleet of spacecraft. 

You are a special agent and have just succeeded in 
sneaking into the alien complex. Your mission is to destroy 
this threat to mankind and return with plans for the power- 
ful defense shield. The outcome of this mission will decide 
the fate of mankind. 



such as Operation: Sabotage is to figure out what you are 
able to do in a particular situation. Therefore, you will not 
find a Hst of all the verbs the computer can understand, or 
of all the objects you may discover. You might find 
yourself frustrated by what seem to be dead-ends, and end 
up getting killed in the process. This is all part of the 
adventure, and a test of your ingenuity and perseverance. 



Playing Notes 

The computer will always give you a brief description of 
where you are, what objects you can see, and what exits are 
visible. You move and act by typing in simple commands, 
generally consisting of a verb and a noun. If the computer 
tells you that there is a laser pistol in the room, for exam- 
ple, you might want to type in the command "GET 
PISTOL". Later, you might be able to use it to "SHOOT 
MONSTER" or for some other purpose. If you no longer 
want to carry it, you can "DROP PISTOL" whenever you 
please. Since the computer looks only at the first three let- 
ters of the verb and the last three letters of the noun, you 
may use abbreviations such as "SHO TER" (for "SHOOT 
MONSTER") if you desire. Movement is accomplished by 
entering just a single letter rather than a two-word com- 
mand: N, S, E, or W for north, south, east,or west. Typing 
the single word "INVENTORY" (or "INV") will display 
a hst of what you are carrying. Typing "STATUS" (or 
"STA") will give you a readout of your current physical 
condition. 

Part of the challenge of any fantasy/adventure game 



Program Notes 

The most obvious feature of the program listing is that 
most of it looks like a cryptogram. The BASIC keywords 
are all in their usual form, but the string assignment 
statements and DATA lines contain incomprehensible gar- 
bage. This is because all of the room descriptions, object 
names, monsters, and verbs have been encoded. This has 
been done to preserve the value of the game. Anyone who 
types an adventure program in from a listing is bound to be 
disappointed in the game's playability, since he has gained 
so many clues about the plot. So, even though the typing is 
made slightly difficult by the scrambled words, this is the 
only reasonable way of publishing adventure programs in 
listed form. We have also omitted the usual list of variables 
for the same reasons. The variable descriptions give away 
too much information and the encoding of the program 
reduces the usefulness of a variable list. 



SWAT 

In order to offset the proofreading problems created by 
this approach, we have included an expanded SWAT Table 
for this program. (For more details on SWAT, see the 
original article in Issue 35 of SoftSide.) Instead of the nor- 
mal 12-line/5(X)-byte SWAT parameters, we have used 
5-line/200-byte parameters. This will provide an expanded 
SW^^ir Table, enabling you to pinpoint typing mistakes 
more easily. 



40 ^T 
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ss ss ss ss ss ss ss ss ss ss ss 
ss ss 

ss IBH PC BASIC SS 

SS 'Operation: Sabotage' SS 

SS Author: Ray Sato SS 

SS Translation: Fred Condo I SS 

SS Kerry Shetline SS 

SS Copyright (c) !982 SS 

SS SoftSide Publications, Inc SS 

SS SS 

ss SS SS SS SS ss ss SS ss SS SS 



If you don't wish to type this program, it 
is also included on this month's 
SoftSide DV. 

Jump to program Initialization. 

1 SOTD 2550 

3 BOSUB 4:60T0 2210 

Decode and print output. 

4 IF P*="" THEN RETURN 

5 FOR P=l TO LENiP*):J=ASC!l1IDt(PI,P,l)) 
:PRINT CHR*(ABS(J+155»!J>64 AND J<91)+1B 
7t(J>9& AND J<123)))!:NEn:PRINT!RETURN 

Encode input. 

6 V$=«";IF V0$="» THEN RETURN 

7 FOR P=l TO LEN(V0*)!J=ASC(MID$(V0I,P,1 
));V$=V$+CHRI«BS(J+155«(J>64 AND J<91) + 
187*y>96 AND J<123))):NEXT:RETURN 

9 60SUB 4: GOTO 2210 

Descriptions of Individual rooms. 

10 A*="ZI1 ZRIOLKP. 6SVIV RH Z YOFV VF66L 
H SVIV»:S=2:RETURN 

20 A$="Z HZIILD XLnR«Lr:N=l:S=3:RETURN 

30 A$="Z nZIILD )!LIIRWLI":N=2:S=4:RETURN 

40 At="Z HZIILD XLIIRWLr:N=3:S=5:RETURN 

50 At="Z HNZOO ILLN":N=4:S=6:RETURN 

60 A*="Z i^VSLMGZNRHZGRLN )(SZNVVr:B*="8S 

VIV RH Z YOFV VFOSLH SVIV»:N=5:S=7:RETUR 

N 

70 A$="Z HNZOO H6LIZTV KSZNYVI":N=ii>:S=B: 

W=12: RETURN 

80 AI="Z HNZOO XSZNYVI":N=7;S=9!B=13;RET 

URN 

90 At="Z HNZOO VOVKGILMRX 0ZYLIZ6LIB":N= 

8: S=10:M=14: RETURN 

100 A$="Z VRLOLTRKZO 0ZYLIZ6LIB. 8SVIV R 

H Z m YFG6LH LH BSV DZ00":N=9:li=15:RET 

URN 

110 At="Z H6LIZTV XSZNYVr:«=16:ftETURN 



120 AI="Z OZITV XSZNYVI":B»="GSVIV RH Z 
XZYRNVS SVIV":S=13:«=17:E=7:RETURN 
130 A*="Z HGIZHTV KFIKOV ILLN. GSVIV RH 
Z YOFV YFSGLH SVIV":N=12:S=14:W=1S:E=8: 
RETURN 

140 A»=»Z HNZOO LUURXV":N=13:S=15:E=9!RE 
TURN 

150 A*="Z HNZOO ILLN DR6S Z XZIH 6ZY0V R 
n SSV XVHeVI":N=14:S=l&:M=20:E=10:RETU 
RN 

160 A$="Z OZITV LUURXV. GSVIV RH Z Wmp 
SVIV":N=15:til=21:E=ll:RETURN 
170 A$="Z LUURXV ORGS Z OZITV «VHP":S=18 
:E=12:RETURN 

180 AS="Z H6LIZTV ILLN":N=17:S=19:E=!3:R 
ETURN 

m M='l OZITV SZ00":N=18:S=20: RETURN 
200 A$='ZH VI1SVIGZRI1NVH6 ILLN. Z HXIVVH 
IVHGH LM6SV DZDO»!B*="GSVIV RH Z YOFV ZH 
W Z IVW YFB6LH FHWVI GSV HXIVV(1":N=19:S 
=2!:E=15:RETURN 

210 Af="Z HZSZ IVXLIU HGLIZTV ILLN":N=20 
;E= 16: RETURN 

220 At="IZISZI XLHGILO. GSVIV RH Z HNZOO 
HXIVVH SVIV":S=23:W=27:RETURN 
230 A*="Z NViiJRXZO HBZBRLH. GSVIV RH Z OZ 
ITV 6ZY0V SVIV":N=22:S=24:li=28:RETUR 
N 

240 A$="Z HVXFIRGB H6Z6RLH":N=23: RETURN 
250 A*="Z IZiJRL ILLN":S=26:W=30:RETURN 
260 .A«="Z HNZOO ILLN. GSVIV RH Z HZUV R 
H GSV HLF8S DZ00":N=25!H=31:RETUR« 
270 A*="eSV ILYLG XLHGILO XVM6VI. GSVIV 
RH Z HNZOO XLHGILO XLNKF6VI NLFHGVIi R 
H BSV DZ00":B«="":W=32:E=22: RETURN 
280 A*="6SV DVZKLHH HGLIZTV ILLN":S=29:W 
=33: E=23: RETURN 

290 A*="Z 0RYIZIB":N=28:S=30:W=34:RETURN 
300 A*="Z HVXFIRGB XSVXP ZIVZ":N=29;«=36 
:E=25: RETURN 

310 AI="Z HNZOO ILLN DRGS Z mW. Z HRTH 
IVZMH":B«='"KIVHHFIV 6L IVZXBLI.' Z YOF 
V YFBGLH RH OLXZGVW FHIiVI GSV HRTH":E=26 
: RETURN 

320 A$="OZFHXS XLHGILO. GSVIV RH Z MVHP 
SVIV":S=33:li=37:E=27:RETURN 
330 AI="Z HNZOO XLIIRWLI":N=32:S=34:E=28 
: RETURN 

340 A»=»Z HGIZHTV YOFV ILLN. GSVIV RH I 
IV» YFBGLH SVIV»iN=33:S=35:E=29:RETU 
RN 

350 A«="Z BRHB HGLIZTV ILLN":N=34:lil=40:R 
ETURN 

360 AI="Z HNZOO XSZNYVI. Z lilLLl DVHG OVZ 
m GL GSV HFXOVZI IVZXGLI":E=30:RETURN 
370 A$="Z HNZOO, HZIILD XLIIRMLI":N=42:E 
=32: RETURN 
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380 A$="GSV XLNKFGVI XVMBVI. GSVIV RH Z 

HNZOO HOLG RH BSV XLNKFGVI ■:S=39:RETUR 

N 

390 AI="6SV XSVNRXZO 0ZY'":N=38:S=40:RETU 

RN 

400 A$=»6SV IVZXBLI XLHGILO XVHGVI. BSV 

IV RH Z YOFV YFBGLH ZHW Z IVId LHV. Z HR 

TH HZBH IVZXBLI .XLHGILO - IVIi=LH, YOFV=L 

UU":N=39:E=35:RETURN 

410 At="6SV HFXOVZI IVZXBLI. Z XLNKFGVI 

IVHGH LH6SV DZ00":E=36: RETURN 

420 A»="GSV DVH6 VHH LU Z OLHT XLIIRNLI" 

:S=37:E=43:RETliRN 

430 AI="6SV VZHG VHW LU Z OLMT XLIIRWLI" 

:H=42:E=44: RETURN 

440 AI="Z HVXFIRGB XVHGVI" :IJ=43:E=45: RET 

URN 

450 A$=»Z HNZOO OZFHXS ZIVZ":B*="6SVIV R 

H Z HNZOO HOLG HVCG BL GSV OZFHXSTZGV":H 

=44: RETURN 

Extended room descriptions. 

460 IF A=iO AND (D3=l OR 03=2! THEN C$=" 

GSV NLHHGVI XZTV RH LKVH" 

470 IF A=12 AND D5=0 THEN C$="BSV XZYRHV 

G RH OLXPVl^" 

480 IF A=12 AND 05=1 THEN C$=»GSV XZYRHV 

G RH LKVH" 

490 IF A=20 AND D6=0 THEN C$="6SV HXIVVH 

RH YOZHP" 
500 IF A=20 AND D6=l THEN C$="Z NLERV RH 

YVRMT KOZBVW LH SSV HXIVVH" 
510 IF A=26 AND D9=0 THEN C$="BSV HZUV R 
H OLXPViil' 

520 IF A=26 AND D9=l THEN C*="GSV HZUV R 
H LKVH" 

530 IF A=27 AND E2=0 THEN C*="GSV XLNKFG 
VI RH ZXGREV" 

540 IF ft=27 AND E2=l THEN C$="6SV XLMKFB 
VI RH i^VHGILBVW" 

550 IF A=36 AND E6=0 THEN C*="BSV IVZXGL 
I HLLI RH URINOB OLXPVIil" 
560 IF A=36 AND E6=l THEN Ct="6SV IVZXGL 
I WLLI RH LKVH":«=41 
570 IF A=45 AND E9=0 THEN C$="GSV OZFHXS 

TZGV RH XOLHVW" 
580 IF A=45 AND E9=l THEN C*="6SV OZFHXS 

TZGV RH LKVH":E=46 



Generate the list of visible items and 
available exits. 



590 Af=A$+".":IF LENiB$)>3 THEN BI=Blt" 

600 IF LEN(C$)>3 THEN C$=C«+"." 
610 IF NOO THEN E«="HL16S " 
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620 IF SOO THEN E$=E*+"HLF6S » 

630 IF «>0 THEN E$=E$+"DVH6 " 

640 IF E>0 THEN E$=E*+"VZH6 " 

650 IF £$<>"" THEN E*=LEFT»{E$,LEN!E$)-1 

) 

Describe current location, visible Items, 
and available exits. 

660 CLSjPRINT'YOU ARE IN:'!P$=ft*!60SUB 4 

: PRINT: IF B*<>"" THEN PI=B$!60SUB 4 

670 IF C$<>"" THEN Pt=C$!GDSUB 4 

680 PRINT:PRINT"OBJECTS YOU CfiN SEE: ":P 

$=" ":FOR T=l TO 16: IF A=IfT) THEN P$=I« 

(T):BOSUB 4 

690 NEn:IF P«=" " THEN P$="-HL6SRHT-":6 

OSUB 4 

700 PRINT:PRINT"EXITS: ":P»=Et!GOSUB 4 

Print out additional warnings, messages, 
etc. 

710 IF (A=40 OR A=35 OR A=30 OR A=3n AN 
D Ii4)=0 AND F3=0 THEN P$='6SV HN200 YOZ 
XP yVERKV RH Y0RI1PRHT":60SUB 4 
720 IF A=36 AND I!4)=0 AND F3=0 THEN P$= 
"BSV HNZOO YOZXP NVERXV RH UOZHSRHT 

YIRTSGOB':GOSUB 4 

730 IF F4O0 THEN F4«=RI6HT$(STR$(F4),2) 
:P$="6SV XLNKFGVI HZBH: '»+F4$+" NRHFGVH 

FMGRO «V-HeiFXGRLH'":BOSUB 4 
740 IF D3=l THEN P*="» t t ZORVH NLHHGVI 

ZB62XPRMT t t t':B08UB 4 
750 IF D7=l OR E0=i OR E3=l OR E7=l THEN 

P«="l % t HVXFIRGB KZGILO ZGGZXPRHT t t 

l":60SUB 4 

Get and Interpret command. 

760 PRINT: INPUT»COHHAND"|VO$:GOSUB 6 
770 FOR T=l TO 4: IF V$=LEFT$CV$(T),I) TH 
EN V$=V«(T) 
780 NEXT T 

790 IF LENiV«)<3 THEN 660 
BOO Vl$=LEFT*(V»,3>:V2*=RIGHT*(y$,3) 
810 FOR T=l TO 17:IF V1«=LEFT«(VI(T),3) 
THEN V1=T 

820 NEXT T:IF V1=0 THEN P«="R MLH'G FHNV 
IH6ZHW DSZB BLF DZH6.":60SUB 4: FOR 11=1 
TO 1000:NEXT:G0T0 2210 
830 FOR T=l TO 16: IF V2$=R!GHT$(It!T),3) 
THEN V2=T 
840 NEXT T 

850 ON VI SOTO 870,910,950,1020,1100,128 
0, 1340, 1360, 1530, 1590, 1630, 1760, 1830, 188 
0,1980,2140,2200 
860 GOTO 2210 



Handle commands. 

870 IF N=0 THEN 1080 
880 IF D3=l THEN Pt="SSV NLNHGVI YOLXPH 
GSV VCRB":SOTO 3 

890 IF D7=l OR E3=l THEN GOTO 1070 
900 A=N;60T0 2210 
910 IF S=0 THEN 1080 
920 IF 8=24 AND D8O0 AND E201 THEN D7= 
hBDSUB 1090 

930 IF S=30 AND E4O0 AND E201 THEN E3= 
1:G0SUB 1090 
940 A=S:60T0 2210 
950 IF K=0 THEN 1080 
960 IF D3=l THEN P»="6SV NLHHGVI YOLXPH 
GSV VCRG":80TO 3 

970 IF E0=1 OR E3=l OR E7=l THEN 1070 
980 IF N=41 AND F3=0 THEN P$="IZIIRZGRLH 
UILN GSV IVZX6LI SR6H BLF":GOSUB 4:60T0 
2460 

990 IF W=30 AND E4O0 AND E201 THEN E3= 
hGOSUB 1090 

1000 IF N=27 AND ElOO AND E20I THEN EO 
=1:60SUB 1090 
1010 A=H:G0T0 2210 
1020 IF E=0 THEN 1080 
1030 IF E0=1 OR E3=l OR E7=l THEN 1070 
1040 IF E=27 AND ElOO AND E201 THEN EO 
=1:G0SUB 1090 

1050 IF E=44 AND E8O0 AND E201 THEN E7 
=1:S0SUB 1090 
1060 A=E:GOTO 2210 

1070 PI='6SV HVXFIRGB ZHHILRW YOLXPH GSV 
VCRG":GOTO 3 

1080 P$="GSVIV RH HL DZB GL TL GSZG WRIV 
XGRLN'sGOSUB 4:F0R J=l TO 1500:NEXT:GOTO 
2210 

1090 P*="Z HVXFIRGB ZHHILRH ZDZR6H BLF": 
GOSUB 4: RETURN 

1100 IF A=l AND V2$="LXP" THEN P$="BSV Z 
RIOLXP LKVHH ZHM BLF ZIV YOLDH LFG RHGL 
GSV EZXFFN LU HKZXV": GOSUB 4: GOTO 2460 
1110 IF A=12 AND V2$="HVG" AND D5=0 AND 
1(2)00 THEN P*=»BLF QFH6 ZIVM'G HGILHT 
VHLFTS GL ULIXV RB LKVH":80T0 3 
1120 IF A=12 AND V2*='HV6" AND D5=0 AND 
I(2)=0 THEN P$="GSV XILDYZI SVOKVN. GSV 
XZYRHVG RH HLD LKVN": GOSUB 4:D5=l:n5) = 
ABS(n5)):G0T0 2210 

1130 IF A=12 AND V2*="«VG" AND D5=l THEN 
Pf="6SV XZYRHVG RH ZOIVZWB LKVH':GOTO 3 
1140 IF A=16 AND V2$="VHP" THEN PRINT"OK 
":I(6)=ABS(I(6)):G0T0 2210 
1150 IF A=17 AND V2«="VHP" THEN PRINT'OK 
":I(7)=ABS(I(7)):60T0 2210 
1160 IF A=26 AMD V2«="ZUV" AND D9=l THEN 
P*='GSV HZUV RH ZOIVZNB LKVH":60T0 3 



1170 IF A=26 AND V2*="ZLIV" AND D9=0 THEN 

P$='R «LH'6 SZEV GSV PVB GL LKV« GSV HZ 
UV":B0T0 3 

1180 IF A=31 AND V2$="VHP" THEN P*="LP. 
BLF URHM NLGSRHT RHHRHV':GOTO 3 
1190 IF A=32 AND V2f="VHP' THEN PRINT»OK 
":I(14)=ABSSI(14)):G0T0 2210 
1200 IF A=36 AND V2«="LLI" AND E6=l THEN 

P«="6SV «LLI RH ZOIVZWB LKVH":GOTO 3 
1210 IF A=36 AND V2$='LLI" AND E6=0 AND 
I (6)00 THEN Pt='BLF WLII'6 SZEV GSV PVB 
GL BSV WLLI":GOTO 3 

1220 IF A=36 AND V2f='LLI" AND E6=0 AND 
n6)=0 AND E5=0 THEN PI="BLF ZIV HFXPVN 
RHGL GSV FHKIVHHFIRAVW IVZXGLI YFROWRH 
T":60SIJB 4:G0T0 2460 
1230 IF A=36 AND V2«="LLr AND II6)=0 TH 
EN P$="6SV NLLI RH HLD LI«:VM": GOSUB 4:E6= 
hGOTO 2210 

1240 IF A=41 AND V2$="HV0" THEN P*="8SV 
KZHVO RH URINOB OLXPVH":GOTO 3 
1250 IF A=45 AND V2*="LXP" AND E9=l THEN 

P$=»GSV ZRIOLXP RH ZOIVZWB LKVH":BOTO 3 
1260 IF A=45 AND V2$="LXP« AND E9=0 THEN 

P$="GSVIV ZIVH'G ZHB ERHRYOV XLHGILOH": 
GOTO 3 

1270 P$="R XZH'G HL GSZG":6QT0 3 
1280 IF V2$="BVI" OR y2*="LRI!" THEN P$=" 
«LI1'6 YV IRHRXF0LFH":60T0 3 
1290 IF V2=0 THEN P*="R XZH'G WL GSZG'':6 
OTO 3 

1300 IF IfV2)=0 THEN P$="BLF ZOIVZBB SZE 
V GSZG": SOTO 3 

1310 IF AOI(V2) THEN Pi="R NLM'G HVV RG 
SVIV":GOTO 3 

1320 IF P4>=8 THEN PI="HLI1B, BLF XZH'S 
XZIIB ZHBGSRI1T NLIV":GOTO 3 

1330 P4=P4+1:I(V2)=0:PRINT"OK":GOTO 2210 
1340 IF V2=0 THEN P$="BLF HLH'G SZEV GSZ 
B":BOTO 3 
1350 P4=P4-l:nV2)=A:PRINT"0K":60T0 2210 

1360 IF I (5)00 THEN P$="BLF NLH'G SZEV 
Z DV2KLH":G0T0 3 

1370 IF A=l AND V2$=»LXP" THEN P«="BIF Z 
IV YOLDH LFG LU GSV ZRIOLXP RHGL GSV E 
ZXFFN LU HKZXV=:GOSUB 4:60T0 2460 

1380 IF A=27 AND V2$="GVI" THEN P$='GSV 
XLNKFGVI RH «VHGILBVW":GOSUB 4:E2=1;E0=0 
:60T0 2210 

1390 IF A=38 AND V2$="GVI" THEN P*="BSV 
HSLG IVUOVXGH LUU LU GSV XLNKFGVI": GOSUB 
4: GOTO 2460 

1400 IF A=41 AND V2I="GVI" THEN P$="GSV 
DSLOV HFXOVZI IVZXGLI RH VCK0L«RI1T":G0SU 
B 4: GOTO 2460 
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1410 IF V2l="RtiH" OR V2$="YL6" OR V2t="I 

LO" OR V2$="IMH" OR V2$="ZI«" THEN V2$=" 

LRH" 

1420 IF V2*<>"BVr AND V2$<>"LRH" THEN P 

f="GSV OZHVI HSL6 SZH HL VUUVXG'iBOTO 3 

1430 IF V2*="6Vr' AND D3=0 THEN P$="R ML 

H'6 HVV ZHB NLHH6VI SVIV":60T0 3 

1440 IF V2$="LR«" AND 07=0 AND E0=0 AND 

E3=0 AND E7=0 THEN P$="R KLM'B HVV ZHB Z 

HKILRHH SVIVrGOTO 3 

1450 T=INT(100tRND(l))+l!lF T>P2+P3+50 T 

HEN P$=»BLF LIRIV ZMH NRHH»:60TD 3 

1460 IF D3=l THEN PI="BLF SR6 6SV NLNH6V 

I":60SUB 4:D4=D4-(il0+P2+P3)/2);IF M<=0 

THEN D3=0:D4=0:P$="BLF SZEV PROOVH RG": 
GOTO 3 

1470 IF D7=l THEN PI="BLF SRG 6SV ZHHILR 
r:60SUB 4:D8=D8-!(5+P2+P3)/2)!lF D8<=0 
THEN D7=0:D8=0:PI="R6 RH MVH6ILBV»":60T0 

3 

1480 IF E0=1 THEN P$="BLF SRG GSV ZHWILR 
D'jGOSUB 4!El=El-((5+P2+P3)/2):IF E1<=0 
THEN E0=0:E1=0:P$='R6 RH WVHGILBVW-.BOTO 

T 

1490 IF E3=l THEN P$="BLF SRG GSV ZHHILR 
r:GOSUB 4:E4=E4-U5+P2+P3)/2);IF E4O0- 

THEN E3=0!E4=0:P$="RG RH «VHG1LBVH"!G0TC 
3 

1500 IF E7=l THEN P«="BLF SRG GSV ZHHILR 
H":GOSUB 4:E8=E8-((5+P2+P3)/2)!lF E8<=0 
THEN E7=0:E8=0:P$="RB RH MVHGILBVWiGOTO 

3 

1510 IF D3=l THEN P$="RG RH H6R00 ZOREV" 
•.GOTO 3 

1520 P$="GSV ZHNILRSf RH HGROO UFMXGRLHRH 

T"!60T0 3 

1530 IF V2=0 THEN PI="R KZM'G HL 6SZ6»:8 

OTO 3 

1540 IF I(V2)<>0 THEN P«=''R HLH'G SZEV G 

SZ6":G0T0 3 

1550 IF V209 AND V2014 THEN P*="R XZH' 
6 HL 6SZ6":G0T0 3 

1560 IF !V2=9 AND A=44) OR (V2=14 AND A= 
38) THEN P$="HLGSRHT SZKKVHH'iGOSUB 4 
1570 IF V2=9 AND A=38 THEN F4=35:P$="GSV 

XLNKFGVI IVKORVH: 'YZHV HVHGIFXG HVJ 
FVHXV HGZIGVH' HVHGIFXGRLH RH 34 NRH 
FGVH.":GOSUB 45P4=P4-1:I(9)=100:G0T0 221 

1580 IF V2=14 AND A=45 THEN P$=«GSV TZGV 

LKVHH'iGOSUB 4:E9=1:60T0 2210 
1590 IF V2O10 THEN P«=»HLH'G YV IRHRXFO 
LFH'iGOTO 3 



1600 IF lUOJOO THEN P*="BLF HLH'G SZEV 

GSZ6":60T0 3 

1610 PRINT"0r!l(10)=50!p4=P4-l!Pl=Pl+5t 
P3:IF P0<P1 THEN P0=P1 
1620 GOTO 2210 

1630 IF A=l AND V2$="0FV" THEN P»="8SV Z 
RIOLXP LKVHH... BLF ZIV YOLDH LFG RHGL 
GSV EZXFFN LU HKZ)(V":60SUB 4:G0T0 2460 
1640 IF fl=6 AND V2$="0FV' THEN P$="Z HGI 
ZHTV, LIZHTV TOLD XLEVIH BLF ZHH GSVH 
UZHVH ZDZB'-.GOTO 3 
1650 IF A=10 AND V2$="IVH" AND D3=l THEN 

P$="HL6SRHT SZKKVHH'-.GOTO 3 




1660 IF A=10 AND V2I="IVH" THEN D3=1:P*= 
"ZH ZORVH NLHHGVI RH IVOVZHVH. RG RH 

Z6BZXPRHT BLF!":BOTO 3 
1670 IF A=13 AND V2t='0FV" THEN A=34!p*= 
"Z UOZHS LU ORTSG GVNKLIZIROB YORHHH BLF 
»:BOTO 3 
1680 IF A=20 AND V2*='IVH" AND D6=0 THEN 

P$='HLGSRHT SZKKVHH'iGOTO 3 

1690 IF A=20 AND V2t="IVW» THEN D6=0:P$= 

"GSV HXIVVM TLVH Y0ZHP":60T0 3 

1700 IF A=20 AND V2$="0FV" THEN D6=1:P*= 

"GSV HXIVVH 0RT8GH FK'iGOTO 3 

1710 IF A=31 AND V2*="0FV' THEN E5=l!PRl 

MT"0K":G0T0 2210 

1720 IF A=34 AND V2I="1VH' THEN A=13!P«= 

"Z UOZHS LU ORTSG GVNKLIZIROB YORHHH BLF 



":GOTO 3 

1730 IF A=40 AND V2*="IVH" THEN F3=0:PRI 

NT"OK":GOTO 2210 

1740 IF A=40 AND V2t="0FV" THEN F3=l!PR! 

NT»0K":60T0 2210 

1750 P$=»NLGSRHT SZKKVHH":GOTO 3 

1760 IF A=22 AND V2$="VVn" THEN P$="BLF 

XZH HVV HLGSRHT LU RH6VIVHG LH GSV IZHZ 

I":GOTO 3 

1770 IF V2=0 THEN P*="R WLH'G SZEV 6SZG" 

iGOTO 3 

1780 IF I(V2)<>0 AND A<>I!V2) THEN P»="R 

HLH'G SZEV GSZ6«:60T0 3 
1790 IF V2=3 OR V2=13 THEN P$="R HVV HLG 
SRHT HKVXRZO":GOTO 3 
1800 IF V2=9 THEN PI="HLIIB, LHOB Z XLNK 
F6VI XZH IVZH Z KILTIZN":60T0 3 
1810 IF V2=16 THEN P$="6SV KOZHH ZIV HVZ 
OVH...LHOB XLNNZHW XZH LKVH GSVN":GOTO 3 
1820 P«="R XZH'G IVZH GSZB":60T0 3 
1830 CLS!P$='t t » KOZBVI'H RHEVHGLIB » 
i r'iGOSUB 4 

1840 PRINTsFOR T=l TO 16!lF I!T)=0 THEN 
P*="- "tI$!T):GOSUB 4 
1850 NEXT T 

1860 PRINT: INPUT"HIT <RETURN> TO CONTINU 
E"5T$!PRINT 
1870 GOTO 2360 

1880 IF V2=0 THEN Pt="R XZH'G «L 8SZG":G 
OTO 3 

1890 IF I(V2)<>0 THEN PI='R HLH'G SZEV G 
SZB" iGOTO 3 

1900 IF V2=l AND A=12 AND D5=0 THEN Pl=" 
GSV XZYRHVG OLXP RH HVHGILBVH":GOSUB 4iD 
5=1: I ( 1)=100; I (5)=ABS( I (5) ) :P4=P4-l!G0T0 

2210 

1910 IF (V2=l OR V2=15) AND (D3=l OR D7= 
1 OR E0=1 OR E3=l OR E7=l) THEN I(V2)=10 
0!P4=P4-l:G0T0 1460 

1920 IF (V2=l OR V2=15) AND A=l THEN P$= 
"GSV ZRIOLXP RH HVHGILBVH...BLF ZIV YOLD 
HLF6 RHGL GSV EZXFFN LU HKZXV!":GOSUB 4: 
GOTO 2460 

1930 IF (V2=l OR V2=15J AND A=36 AND E6= 
AND E5=0 THEN P*='GSV HLLI RH HVHGILBV 
H... BLF ZIV HFXPVH RHGL GSV FHKIVHHFIRA 
VH IVZXGLI YFR0HRHT"!60SUB 4:GOT0 2460 

1940 IF (V2=l OR V2=15) AND A=36 AND E6= 
AND F3=0 THEN P»="GSV HLLI RH HVHGILBV 
H. BLF ZIV YLNYZIHVHDRGS IZHRZGRLH'iBOSU 
B 4: GOTO 2460 

1950 IF (V2=l OR V2=15) AND A=36 AND E6= 
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THEN P*="6SV HLLI RH «VH6ILBW:60SUB 
4:E6sl: I !V2)=100!P4=P4-l!B0T0 2210 

1960 IF V2=l OR V2=15 THEN P*="6SV '*m 
W*' SZH HL VUUVXB"!60SUB 4!l(V2)=100!P 
4=P4-h60T0 2210 

1970 GOTO 1340 

1980 IF V2=0 THEN P*="R XZN'B ML BSZS'sB 

OTO 3 

1990 IF I!V2)<>0 THEN P«="R KLB'B SZEV 6 

SZB'sBOTO 3 

2000 IF V2=5 AND D3=l THEN V2»="BVr 

2010 IF V2=5 AND !D7=1 OR E0=1 OR E3=l 
R E7=l) THEN V2»s"LRN" 
2020 IF V2=5 THEN 1360 

2030 IF V2=4 AND F3=0 AND (A=40 OR A=35 
OR A=30 OR A=31> THEN P$="BSV YOZXP NVER 
KV RH Y0RHPRHT"!60T0 3 

2040 IF V2=4 AND F3=0 AND A=36 THEN P*=" 
BSV YOZXP NVERXV RH UOZHSRHT YIRTSBOB'sB 
OTO 3 

2050 IF V2=4 THEN P$="BSVIV ZIVB'B ZHB E 
RHRYOV XLMBILOH LH BSRH NVERXViBOTO 
3 

2060 IF V2=12 THEN I(12)=A5P4=P4-l!!*(12 
)="ZINVN KSL6LH YLNY":F2=35!PI=»6SV YLNY 
DROO VCKOLNV RH 35 NRHF6VH":60T0 3 

2070 IF V2=2 AND A=12 AND D5=0 THEN D5=l 
!P*="6SV XZVRHV6 RH HLD LKVH":GOSUB 4:I( 
5)=ABS(I(5)):e0T0 2210 

2000 IF V2=2 AND A=12 AND D5=l THEN P*=" 
BSV XZYRNV6 RH ZOIVZNB LKVH":60T0 3 

2090 IF V2=7 AND A=26 AND D9=0 THEN D9=l 
:I(I6)=ABSUU6)!:PI="6SV HZUV LKVHH':60 
TO 3 

2100 IF V2011 THEN Pt="DSZ6 NL BLF DZI16 
NV 8L «L DR6S BSV •+I$(V2)+"?"!fiOT 
3 

2110 IF I(8><>0 THEN P»="6SVIV ZIVN'B ZH 
6 YZ66VIRVH ULI BSV IZNRL'jSOTO 3 

2120 IF F2O0 THEN F2»=STR$(F2)!PRINT!PI 
="Z ELRXV HZBH 'YLNY HBZBFHi'sBOSUB 4:P* 
=F2t+" NRHF6VH FN6R0 NVBLHZ6RLH'":G0T0 3 

2130 P$='6SV IZNRL RH HROVMB'sBOTO 3 
2140 CLS:P»='t » t KOZBVI'H H6ZBFH I t t 
"sBOSUB 4!PRINT 
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2150 Pl*=STR$«Pl)iP$=")(FIIVH6 SRB KLRH8H 
= ■+Pl$:SOSyB 4 

2160 P2$=STR«fP2):P*="NVCBVIR6B ZBBIRYFB 
V = ■tP2t!B0SUB 4 

2170 P3$=STR*!P3)!P*="0FXP Z86IRYF6V 
= ■tP3$!B0SUB 4 

2180 PRINTsPRINT'HIT <RETURN> TO CONTINU 

E";!T*=INPUT«(1)!PRINT 

2190 60TO 2360 

2200 CLS!P$="TZMV LEVI":60SUB 45BOTO 247 


Update player status. Conduct combat If 
appropriate. 

2210 IF F2O0 THEN F2=F2-1:IF F2<=0 THEN 

2380 
2220 IF F4O0 THEM F4=F4-l!lF F4<=0 THEN 

2420 

2230 IF PKPO THEN P5=P5+.5!lF P5=l THEN 
P5=0:P1=P1H 
2240 IF D3=0 AND D7=0 AND E0=0 AMD E3=0 
AMD E7=0 THEN 2350 
2250 T=INT(RND(l)tl00) 

2260 IF D3=l THEN Pf="BSV NLHHBVI Z66ZXP 

H... "iBOSUB 4 

2270 IF D301 THEN P$="BSV HVXFIRBB Z««I 

LRU HSLLSH... "sBOSUB 4 

2280 IF T>80-(P2+P3) THEN P$="R6 MRHHVH" 

iBOSUB 4!60T0 2350 

2290 Pl=Pl-(INT!(5«RND«l))+l)+(f5IRND(l) 
)+l)+((5»RNDfl))+l) + ((5tRNDU))+l)tl5-P3 
) 

2300 IF D301 THEN Pl=Pl+5 
2310 IF PKO THEN 2460 
2340P*="BLF ZIV SRB! "iBOSUB 4 

2350 IF V1=0 OR VI >4 OR D3tD7+E0+E3+E7>0 
THEN FOR ZZ=1 TO 3500: NEXT 

Initialize for new turn. Jump to 
appropriate room description. 

2360 V$="":Vll="iV2*=""!Vl=0!V2=0!A$=" 
:B*="":C$="!D*="!E*="iN=0!S=0!M=0!E=0 

2370 ON A 60SUB 10,20,30,40,50,60,70,80, 
90, 100, 1 10, 120, 130, 140, 150, 160, 170, 180, 1 
90,200,210,220,230,240,250,260,270,280,2 
90, 300, 310, 320, 330, 340, 350, 360, 370, 380, 3 
90,400,410,420,430,440,450,2500!60TO 460 
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Evaluate end-game conditions and 
display appropriate messages. 

2380 CLSjIF A=46 THEN F4=-1:60T0 2500 
2390 P*="GSV KBLBLH YLNY VCK0LNVH...BSV 
VH6RIV XLNKOVC RH NVHBILBVN" iBOSUB 4 

2400 Pt="BLF SZEV YVVH PROOVN YB BSV ULI 
XV LU GSVY0ZH6" iBOSUB 4 

2410 PRINTiPRINTiBDTO 2470 
2420 CLS: IF A=46 THEN 2500 

2430 IF A=38 THEN P$="BSV XLNKFBVI UOZHS 
VH YIRTS60B, VNR6BRHT HKZIPH RH ZOO MRIV 
XBRLHH'iBOSUB 4 

2440 P$="6SV XLNKOVC HFMNVHOB VCKOLWVH R 
«BL NRO- ORLHH LU KRVXVH" iBOSUB 4 

2450 P»="BLF ZIV PROOVN YB BSV UZOORMT H 
VYIRH ZILFHH BLF'iBOSUB 4iPRINTiPRINT 
iGOTO 2470 

2460 P*="BLF ZIV NVZN! "iBOSUB 4 

2470 INPUT'DO YOU NANT TO PLAY A6AIN? (Y 

/N) "iA« 

2480 IF LEFT*<A$,1)="Y" OR LEFT$(A$,1)=" 

y" THEN 2550 

2490 PRINTiKEY OMiHIDTH SOiCLSiEND 

2500 P$="BSV HKZXV HSRK HFNNVNOB 0RU6H R 

«BL LIYRGZILFHH GSV KOZHVB" iBOSUB 4 

2510 IF ((F2=0) OR iF2<>0 AND 1(12)041) 
) AND F4=0 THEN Pf="BLF NRHH'B NVHGILB 6 
SV YZHV. BLF SZEV UZROVN BLFI NRHJffiLH. 
"iBOSUB 4!PRINTiB0T0 2470 

2520 P$='UILN Z NRHBZHXV, BLF XZ« HVV BS 
V ZORVH YZHV VCKO-NViBOSUB 4 

2530 IF 1(16)00 THEN P$="BLF NRNH'B IVX 
LEVI BSV HVXIVB KOZHH NVVNVN YB HBZI 
XLNNZHN" iBOSUB 4!PRINT!B0T0 2470 

2540 Pf="NRHHRLH RH Z HFXXVHH! "iBOSUB 4: 
BOTO 2470 

Initialize woricspace. Read in items and 
verbs. 

2550 TROFFiCLSiKEY OFFiCLEARiNIDTH 40iDI 
H It(16),I(16),V$(17) 
2560 CLSiPRINT TAB(5);CHR$(34)i"0PERATI0 
Ni SAB0TABE,"-,CHRI(34);" BY RAY SATO'iPR 
INT TAB(13)}"IBH PC VERSION BY'iPRINT TA 
8(7); "FRED 3. COMDO I KERRY SHETLINE" 

contimied on page 46 



VINYL PROTECTIVE DISK SLEEVES 




Cb|.OR CODED: WfuHi-cotor DtscSavers'.'"' are designed 
for easy recognitton of individual disks with your own 
color-keyed filing system. Ideal for office or home use. 

PROTECTIVE: Custom grain vinyt provides Added 
protection for magnetic disks by guarding against 
common handling hazards. 

ATTRACTIVE: DiscSavers provide a handsome and 
■professional method of single disk storage and 
enhance the look of your hardware while protectipg. .. 
your valuable softwara '-"^^STi. ■ 



DURABUE: "Rigid vinyl consOiiCtion protects against 
constant handling to ensure long \N^r and tear. 

PORTABLE: DiscSavers are the only portable v w\^ 
disk sleeves for use with a single diskette that ^H 
RockRoy mark of quality. ' "tV^^d'S 

Contact ypur Dealer or Distributor "*.?^N^^rf'^ 



7721 E. G __ 
. Scottsdale; Aff2dna1&5260 
^'(602)998-1577 

Computer Prodocts Diuislbn Tpll-Free 800-528-2361 




fl tfademsrfcdi 



IBM" PC 



continued from page 44 

2570 FOR T^l TO l^sREAD I«(T),nT):NEl<T 
2580 FOR T=t TO S7:READ V«(T):NEXT 
2590 FOR T=l TO «:P0=P0+INT(2IRND<1))+! 
:NEn T 

Establish player-attribote points. Jump 
to first room. 

2600 P1=P0 

2610 FDR T=l TO 10:P2=P2+INT(2«RHD(1))+1 

■Ml] T 

2620 FOR T^l TO 10;P3=P3+INT(2IRND(1))+1 

iNEXT T 

2630 FOR T^l TO 50!D4=D4+INT(2»RND(1))M 

:D8=D8+INT(2tfiND(l)) + l:El=EUINT(2IRND(l 

nM:E4=E4+INT(2tfiND(l))+l:EB=E8+fNT(2»R 

ND(l))+l!NEn T 

2640 fl=l:P4=l 

2650 GDSUB 10:GOTO 4i0 

Item and verb data. 

2660 DftTA KOZHGRX VCKOLHREV.O.XILDVZI,?, 
)(Z0VMMII,8,HNZ00 YQIXP WVER)(V,9,0ZHVI KR 
HSL0.-I2,HV)(F1RGB PVB,-16,V0V1(GILMRI XLN 
GILO YZGLI1,-17,VZGGVIRVH,18,)(LNKFGVI NVH 
GIF)(G KILTIZN,21,HRDEVI KR0Q,23,KLIGZYOV 
lZHftL,25,0ZITV KSLSLH YLNY,2B 



2670 MTfl TZOZXGRX KSZIG,32,0ZFI1XS HBHGV 
N KZHHVSGV,-32,l1RGILT0Bl(VlRI1,39,HVnV6 K 
0Zt1H,-26 



2680 DATA NLIGS.HLFGS.DVHG.VZHGtLKVMJVG 
,«ILK,HSLLG,RMHVIG,VZG,KFHS,IVZM,RM£V«GL 
I6,SS1LD,FHU,HGZGFH,JFRG © 



IBM® -PC SWAT TABLE FOR: OPERATION: SABOTAGE 

(Modified Parameters: NU = 5, B = 200) 
SWAT 
LINES CODE LENGTH 



LINES 



SWAT 
CODE 



1 - 


6 


BK 


7 - 


20 


UA 


30 - 


70 


KT 


80 - 


110 


m 


120 - 


150 


CA 


160 - 


200 


¥M 


2i0 - 


240 


IC 


250 - 


270 


FL 


280 - 


310 


MQ 


320 - 


350 


m 


3tO - 


380 


NC 


390 - 


410 


in 


420 - 


450 


UH 


460 - 


500 


GK 


510 - 


550 


LF 


560 - 


600 


CB 


610 - 


650 


Lfi 


660 - 


700 


&S 


710 - 


730 


m 


740 - 


770 


SL 



1S4 
202 
237 
212 
274 
322 
230 
221 
262 
229 
202 
241 
235 
259 
244 
224 
139 
227 
285 
212 



„Yt«>NB'^*" 



DAISY WHEEL 
PRINTER 




$795 

us shipping 



FEATURES 

• Typewriter or>eration wlih nothing to disconnect • lo. la or 1 5 ctiaracters per 
Inch switch seleciabkr • l't>riable with carrying case • Entire imerface mounied 
iniemally In the Olivetti F»raxis 30 typcwritef • L'nderlining • cables avallatile for 
most compiitcrs • service from Olivetti dealers • Centronics compatible parallel 
input • Bull) in self test • Cartridge ribbon • 2nd keyboard switch selectable 



"^YTEWR ITER 



125 NORTH VIEW RD.. ITHACA. NY. 14850 
(607) 272 1 132 



7B0 - 
830 - 
880 - 
930 - 
980 - 
1030 - 
1080 - 
1110 - 
1130 - 
1170 - 
1210 - 
1230 - 
1260 - 
1300 - 
1350 - 
1390 - 
1420 - 
1450 - 
1480 - 
1500 - 
1530 - 
1570 - 
1590 - 
1640 - 
1670 - 
1700 - 
1740 - 
1790 - 
1820 - 
1870 - 
1910 - 
1940 - 
J 960 - 
2010 - 
2050 - 
2080 - 
2110 - 
2140 - 
2180 - 
2230 - 
2280 - 
2350 - 
2380 - 
2430 - 
2460 - 
2510 - 
2540 - 
2570 - 
2620 - 
2670 - 



820 
870 
920 
970 
1020 
1070 
1100 
1120 
1160 
1200 
1220 
1250 
1290 
1340 
1360 
1410 
1440 
1470 
1490 
1520 
1560 
1580 
1630 
1660 
1690 
1730 
1780 

laio 

1860 
1900 
1930 
1950 
2000 
2040 
2070 
2100 
2130 
2170 
2220 
2270 
2340 
2370 
2420 
2450 
2500 
2530 
2560 
2610 
2660 
2680 



YN 
HP 
VU 
ZA 
JN 
EM 
RY 
DI 
JI 
LI 
DY 
IC 
HS 
HI 
CJ 
UJ 
RT 
ZC 
P£ 
YT 
FL 
JX 
HL 
RN 
WD 
S£ 
OY 
CD 
K 
JJ 
ZN 
FB 
HI 
RB 
CW 
UX 
OU 
LA 
HN 
DL 
XC 
YD 
HD 
TP 
AK 
OX 
ZV 
WE 
VG 
VL 



LENGTH 



182 
153 
148 
153 
183 
177 
226 
223 
241 
266 
210 
211 
209 
235 
262 
237 
224 
291 
222 
20! 
202 
206 
264 
246 
203 
227 
254 
201 
176 
205 
340 
214 
210 
236 
273 
218 
210 
206 

m 

217 
191 
334 
197 
236 
205 
293 
214 
145 
414 
186 
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POKEY 

by Craig Chamberlain 

Pokey Player II is a music/editing/playing utility for the Atari® 400/800 with 
32K and Atari BASIC. 



The POKEY chip inside your Atari 
computer is capable of making many 
sounds, but it takes some work to 
make them sound like music. Doing 
this work in BASIC means there's no 
time to do other things, such as 
graphics, while the music is playing. 
But what if the programming were 
done in Machine Language? Then the 
music could be played at incredibly 
high speeds, too fast for any Ustening 
pleasure. Delay loops could be inserted 
to slow it down, but this would mean 
that much computing time would be 
wasted just waiting. 

The solution? Have the note proces- 
sing occur as part of the system's nor- 



mal vertical blank interrupt routine. 
The vertical blank interrupt 
(VBLANK) happens every sixtieth of a 
second, just before the television starts 
drawing the next frame. Every time 
VBLANK happens, the computer puts 
aside its main task, be it a BASIC pro- 
gram or other operation, and reads the 
joysticks and paddles, looks at the 
keyboard, goes into the "attract" 
mode, etc. When done with the 
VBLANK processing, the computer 
returns to its main task as if nothing 
had happened. VBLANK is invisible to 
the user. 

The vertical blank interrupt would 
be an excellent time to do note proces- 
SoftSide 



sing. Music would appear to be run- 
ning simultaneously with another 
program. 



Presenting... Pokey Player II 

With just a few modifications to the 
Player program published in issue 34 
of SoftSlde, you will have updated 
Pokey Player to the second version. 
Pokey Player II plays the music dur- 
ing the vertical blank, and in fact, can 
be merged with other Atari BASIC 
programs. Now, you can add arcade 
music effects to your own games, or 
listen to Bach as you balance your 
checkbook. 



How To Update Pokey 
Player I 

Make the following changes and ad- 
ditions to the Player program men- 
tioned above. Be careful to make no 
mistakes, as it is very easy to crash the 
system. (Messing with the vertical 
blank interrupt is a very sticky 
operation.) 

1080 P=P+84:K=lNTfP/256):P0KE I54G,P-2 

56tK:P0KE 154!, K 

1090 P=P+206:K=INT(P/256):P0KE 1542, P- 

256»K:P0KE 1543, K 

1500 FOR K=1564 TO li5i:READ PiPOKE K, 

P:NEn K 

1950 P^USRIIM/J 

1985 60T0 1985 

2000 DATA 173,0, 6, 240,7i,21i,lA9, 3,141 

,50,2,141,15,210,173,59,6,141,0,210,17 

3,63,6,141,1,210,173,60,6,141,2,210 

2002 DATA 173,64,6,141,3,210,173,61,6, 

141,4,210,173,65,6,141,7,210,173,62,6, 

141,6,210,173,66,6,141,5,210,173,67 

2004 DATA 6,141,0,210,162,0,32,94,6,23 

2,32,94,6,232,32,94,6,76,98,228,189,16 

,6,133,203,189,19,6,133,204,180,28 

2006 DATA 6,105.8,6,133,205,185,12,6,1 

33,206,222,31,6,240,27,109,40,6,208,18 

,189,31,6,221,46,6,176,10,189,63,6 

2008 DATA 41,15,240,3,222,63,6,96,32,9 

7,6,32,100,6,133,207,41,240,201,128,20 

8,10,165,207,41,7,168,185,68,6,24,125 

2160 DATA 104,169,7,162,6,160,91,76,92 

,228 

A 49 



At line 1970 you may want to insert 
some commands to produce an in- 
teresting display while the music is 
playing. If you have a GTIA chip in 
your computer, try this: 

1960 6RAPHICS 10 

1970 POKE 705+INT(RND(0)t8),PEEK(53770 

!:COLOR RND!0)»li:DRAWTO RND(0)»79,RND 

i0)tl91 

1980 IF PEEK(153i) THEN 1970 

If for some obscure reason you have 
not treated yourself and your computer 
to the wonders of a GTIA chip, the 
following may be of small interest: 

1960 POKE 53261, 255:P0KE 53262, 255:P0K 
E 704,66:P0KE 705,24:P0KE 623,1 
1970 POKE 53248, PEEK (1595): POKE 53249, 
PEEK !1 596 ):60T0 1970 

After making these changes and ad- 
ditions correctly, the Player program 
will play music just as before, with one 
exception. Control will be returned to 
BASIC right after the USR call is ex- 
ecuted, whereas before, control was 
not returned until after the music had 
stopped playing. Therefore, lines after 
the USR call will be executed with the 
music being played concurrently. 



Danger! Warning! Use Extreme 
Caution! 

The Player program stores the ver- 
tical blank interrupt service routine in a 
string (PP$). When Atari BASIC stops 
(by STOP, END, or error), strings get 
moved around in memory. Because of 
this feature, it is very important that 
the BASIC program (the Player, or 
your own program that contains the 
Player routines) never stop after the 
USR call. This is true even after the 
music has ended! Press SYSTEM 
RESET to clear the vertical blank in- 
terrupt patch. Failure to heed this sug- 
gestion could result in machine lockup, 
requiring a cold start. It will not, 
however, damage your computer. 

Merge 

To add music to an Atari BASIC 
program, just append the entire Player 
program. The first few lines of Player, 
which print identification messages. 



can be deleted. There is also room free 
from 1970 to 1999, as well as before 
hne 1000 and after the last DATA line 
for the third voice. (3400 and on 
should be free.) To start the music, 
execute the USR call. 



Controlling Location 
"Active" 

It is possible to freeze the music, 
then cause it to continue, by doing a 
POKE 1536,0 or POKE 1536,1. 
Memory location 1536 is labeled AC- 
TIVE and is monitored for zero/ 
nonzero values. 



Final Notes 



The original purpose of Pokey 
Player was to provide a means to add 
music to BASIC programs. That goal 
has been achieved. Please remember, 
however, that permission must be ob- 
tained before Pokey Player can be 
used in commercial programs. Contact 
SoftSide for further details. 



Capriccio 

SoftSide's issue 34 CV and DV in- 
cluded three Pokey Player demonstra- 
tion pieces: Happy Birthday, Handel's 
March from Scipio, and Capriccio. 
Space limitations allowed us to publish 
only the first two in the magazine. This 
month we present the third piece, 
which can be found immediately 
following this article. It is listed 
separately as a data file running from 
Unes 3100 on up. To use the data file, 
first LOAD the Player program into 
memory, then ENTER in the data file. 
Be sure the data file is in the LIST for- 
mat. After Player has loaded, type 
ENTER "D:CAP" (or ENTER "C:" 
for cassette) to merge in the Capriccio 
music data. A simple RUN command 
will now start the music. 



SPECIAL NOTE! 

Craig Chamberlain and Harry Bratt, 
authors of the Pokey Player pro- 
grams, are most anxious to receive any 
music files created using Pokey 
Player. Please send all correspondence 
to SoftSide. 

SoftSide 



OS L-dpncciO aa 

SS flusic by: Handel SS 

SS ftrranasd bv: Harry Bratt S3 



Copyright ic! 1982 



aa 



SS SoftSide Publications, Inc SS 
SS SS SS SS SS SS SS SS SS SS SS 

3100 DATfi 744,32,4,8,16,32,64,128,0,2, 
132, 82, 18, 82, 26, 90, 58, 98, 58, 132, 34, 10, 
74,26,90,50,90,58,132,26,10,82,34,98 
3102 Dfllft 58,90,59,132,27,19,83,27,35, 
107,128,99,19,132,19,137,201.137,201.1 
0,74,68,3,27,84,3,35,84,3,27,75,27 
3104 Dfilfl 35,83,26,132,34,18,82,26,90, 
58,?8,58, 132,34, 10,74,26,90,128,98,90, 
1 J, 35, 108,68, 12, 74, 98, 18,82,34,98,58 
3106 DATA 90,58,132,66,10,74,26,90,50, 
TO, 58, 132,66, 18, 32, 26, 90, 58,98,59,91, 1 
15,91,83,35,59,83,60,3,128,99,75,99 
3)U8 Oftlfi 107,91,128,83,91,115,91,128, 
83,91,107,99,128,75,99,107,91,2,82,18, 
82,26,106,18,82,34,82,18,10,18,106 
3110 DATA 18,02,26,90,18,82,26,90,58,9 
8,58,132,66,18,82,34,98,58,90,50,132,6 
6, IB, 82,34, 98,58, 90,58,132,66, 10, 74 
3112 DATA 26,90,58,98,58,132,66,18,82, 
26,90,58,98,58,132,34,10,74,128,82,132 
,66,18,10,58,132,34,10,74,128,82,132 
3114 DATA 66, 18, 10,58,132,34,10,74, 128 
,82, 132, 26, 18,82, 128, 74, 132,26, 18,82,1 
28,82,132,34,18,82,128,82,132,66,18 
3116 OAIA 82,26,90,18,10,75,128,67,99, 
91,19,128,67,99,91,20,84,84,84,75,128, 
99,91,107,59,99,107,91,128,82,132,66 
3118 DATA 18,82,26,90,58,98,58,132,34, 
!0, 74, 26, 90,50, 90,58, 132,26, IS, 82,34, 9 
0,58,90,58,132,26,18,82,26,90,58,98 
3120 DATA 58,132,34,10,74,26,90,58,98, 
58,132,26,18,82,58,132,34,10,74,128,82 
,132,26,18,82,58,132,34,10,74,52,76 
3122 DATA 60,4,132,28,4,19,99,75,27,83 
,163,68,70,68,3,99,76,4,2,82,18.82,26, 
90,58,98,58,132,66,18,82,34,98,58,90 ' 
3124 DATA 50,132,66,18,82,34,98,58,90, 
58, 132,66, 10,74, 26, 90,58,98,58, 132,66, 
18,82,26,90,58,98,59,75,84,60,4,2,106 
3126 DATA 10,74,42,106,128,98,90,147,6 
3,27,84,108,60,84,106,90,10,74,26,106, 
18,10,20,4,68,4,67,83,76,128,83,83 
3128 DATA 76,84,84,60,108,60,107,11,20 
,84,109,69,90,66,10,74,26,82,26,90,18, 
90,10,18,123,128,67,107,03,75,128,67 
3130 DATA 83,83,76,83,83,84,76,12,76,1 
2,75,11,75,11,19,19,83,59,108,4,132,27 
,91,107,99,128,76,12,76,12,75,11,75 
3132 DATA 11,19,19,83,59,106,98,18,82, 
34,98,58,90,58,98,18,82,34,98,53,90,51 
,132,35,59,132,27,58,132,98,18,82,74 
3134 DATA 128,98,18,18,124,59,107,27,1 



07,28,76,28,84,44,76,84,83,75,84,132,2 

8,4,128,67,35,83,91,11,35,83,91,11 

3136 DATA 35,83,91,12,3,128,99,76,3,91 

,83,91,12,107,128,67,91,27,75,99,107,9 

1,128,82,132,66,18,82,26,90,58,98,58 

3138 DATA 132,66,18,82,34,98,50,90,50, 

132,66,18,82,34,98,58,90,58,98,18,82,3 

4,98,58,90,58,132,66,10,74,26,90,50 

3140 DATA 90,58,132,26,18,82,34,98,58, 

90,58,132,26,18,82,26,90,58,98,58,132, 

34,10,74,26,90,58,98,58,132,26,18,82 

3142 DATA 58,132,34,10,74,58,132,26,18 

,82,58,132,26,18,82,58,132,34,10,74.50 

,132,34,18,82,59,83,84,76,128,68,84 

3144 DATA 68,98,34,82,82,74,82,82,74,1 

28,84,68,98,34,82,82,74,82,82,74,83,59 

,44,132,110,120,6 

3200 DATA 977,6,6,6,2,132,122,10,74,26 

,90,58,98,58,132,26,10,74,34,98,58,90, 

58,132,26,18,82,26,90,58,98,59,132 

3202 DATA 35,128,83,132,27,75,43,83,91 

,84,3,67,36,42,132,26,18,82,34,98,58,9 

0,128,82,132,66,18,82,26,90,18,82,26 

3204 DATA 90,50,98,58,132,66,18,82,34, 

98,58,90,50,132,66,18,82,34,98,58,90,5 

8,132,66,10,74,26,90,50,90,58,98,74 

3206 DATA 128,98,146,67,90,10,90,18,82 

,26,90,58,98,58,132,66,18,82,34,98,58, 

90,58,132,66,10,74,26,90,50,90,58,132 

3208 DATA 66,18,82,26,90,58,98,58,132, 

66,18,82,34,98,58,90,52,76,68,12,75,99 

,91,27,35,107,99,91,128,83,107,99,91 

3210 DATA 128,83,107,91,99,128,18,132, 

90,10,74,26,90,50,90,58,132,26,18,82,1 

28,74,132,66,10,18,58,132,26,13,82 

3212 DATA 128,74,132,66,10,18,58,132,2 

6,18,82,128,74,132,26,18,82,128,82,132 

,34,10,74,128,82,132,26,18,82,128,74 

3214 DATA 132,66,10,74,26,90,10,18,82, 

90,58,98,128,90,90,10,18,82,90,58,98,1 

28,90,98,18,18,82,106,18,82,26,106 

3216 DATA 18,82,34,106,10,74,26,106,18 

,82,26,90,18,82,26,90,58,98,58,132,66, 

18,82,34, 98, 58,90,51, 91, 83,91, 58, 132 

3218 DATA 26,18,82,34,98,58,90,50,132, 

34,18,82,26,90,58,98,58,132,34,10,74,2 

6,90,50,90,58,132,26,18,82,34,98,58 

3220 DATA 90,58,132,26,18,82,58,132,26 

,18,82,128,74,132,26,18,82,58,132,26,1 

8,82,58,122,18,18,12,76,4,196,66,98 

3222 DATA 18,18,10,90,18,82,82,18,82,3 

4,82,26,18,82,74,10,74,26,82,90,18,82, 

82,18,82,34,82,26,18,82,74,10,74,26 

3224 DATA 82,90,18,82,26,90,58,98,58,1 

32,66,18,82,34,98,58,90,50,132,66,18,8 

2,34,98,58,90,58,132,66,10,74,26,90 

3226 DATA 58,98,58,132,66,18,82,26,90, 

58,98,58,132,66,18,82,34,98,58,90,58,1 

32,66,10,74,26,90,50,90,58,132,66,18 

3228 DATA 10,145,209,145,209,18,18,66, 



42,18,82,26,90,58,98,60,4,2,106,82,74, 

212,66,66,18,10,202,67,82,156,66,66 

3230 DATA 106,18,18,98,18,82,34,106,10 

,18,82,34,10,74,26,106,18,10,74,98,18, 

82,34,106,10,18,82,106,18,82,42,90 

3232 DATA 18,10,76,4,52,76,68,12,68,14 

3,66,90, 10, 18,2, 132,34, 10, 18, 18,98, 18, 

82,34,82,26,90,18,66,10,74,26,82,26 

3234 DATA 90,18,122,18,82,34,82,26,90, 

18,98,18,18,12,18,132,66,18,82,42,90,1 

0,10,76,4,2,82,18,82,42,90,10,18,82 

3236 DATA 90,18,82,42,106,18,82,26,90, 

18, 82, 42, 106, 1 3, 82, 26, 90, 42, 106, 26, 90, 

42,106,58,122,128,98,132,34,58,122 

3238 DATA 58,114,76,4,2,106,10,74,42,9 

8,18,18,82,90,10,74,42,106,10,74,26,90 

,10,74,42,106,10,74,26,90,42,106,26 

3240 DATA 90,42,106,58,114,58,132,34,5 

8,122,58,114,58,90,18,82,26,90,58,98,5 

8,90,10,74,26,90,58,98,58,132,66,18 

3242 DATA 82,82,18,18,10,18,106,18.82, 

26,90, 18,10, 18, 132,66, 18,82,82, 18,82,3 

4,106,10,74,26,106,128,66,18,82,82 

3244 DATA 18,82,34,114,18,82,34,106,10 

,74,42,122,18,82,58,132,26,18.82,128,9 

0, 132, 18, 10, 74, 128,82, 132,67, 83, 128 

3246 DATA 209,201,137,201,10,74,66,98, 

18,82,74,10,74,128,98,10,132,34,18,82, 

74,10,74,128,98,11,75,68,2,122,18,82 

3248 DATA 74,10,74,128,98,10,90,18,82, 

58,132,18,18,10,74,98,18,82,34,98,58,9 

0,106,10,18,82,35,10,18,66,90,18,82 

3250 DATA 26,90,58,98,58,132,66,18,82, 

34,98,58,90,51,91,107,99,128,74,132,66 

,10,74,26,90,58,98,58,132,66,18,82 

3252 DATA 26,90,58,98,58,90,18,82,26,9 

0,58,98,58,132,66,18,82,34,98,58,90,50 

,132,34,18,82,26,90,58,98,58,132,34 



3254 DATA 10,74,26,90,50,90,58,132,26, 

18,82,34,98,58,90,58,132,26,18,82,58,1 

32,26, 18,82,58, 132,34, 10, 74,50, 132 

3256 DATA 34,18,82,58,132,26,18,82,58, 

132,26,18,82,58,132,34,10,74,42,98,10, 

18,82,42,74,42,82,82,74,128,98,82,34 

3258 DATA 82,82,74,82,32,74,2,50,74,82 

,82,18,18,82,26,34,82,82,74,32,82,74,2 

,50,74,82,82,18,18,82,27,76,11,38,6 

3300 DATA 330,16,5,64,48,6,0,3,115,75, 

99,76,3,67,28,128,84,20,68,6,6,4,2,132 

,106, 11, 76, 4, 6, 6, 129, 68,84, 60, 108, 108 

3302 DATA 4,5,16,5,64,53,6,0,2,106,10, 

74,26,106,18,82,27,107,20,16,4,64,46,6 

,0,4,5,2,82,18,18,10,90,18,82,26,90 

3304 DATA 58,98,2,90,10,18,84,76,4,2,4 

2,18,82,82,18,82,34,82,26,18,82,74,10, 

74, 26,82,91), 18,82,82, 18, 82,34, 84, 4 

3306 DATA 5,6,6,5,2,132,26,18,18,67,11 

,76,6,2,106,10,18,12,2,34,234,67,26,82 

,74,12,76,4,128,90,98,18,82,34,106 

3308 DATA 10,18,82,34,10,74,26,106,18, 

10,76,3,99,2,132,18,18,82,42,90,10,18, 

2, 18, 18,82,26, 106, 10,82,34,82, 18,10 

3310 DATA 18,106,18,82,26,74,10,18,18, 

98,18,18,12,132,28,76,4,2,42,18,82,34, 

82,26,90,5,3,124,11,5,2,114,18,82,42 

3312 DATA 90,10,18,84,4,35,27,3,19,3,8 

3,3,19,6,132,26,90,18,82,26,90,58,98,5 

,3,19,3,19,3,83,3,19,6,132,108,4,5 

3314 DATA 6,128,50,66,18,82,74,10,74,2 

6,106,18,82,26,107,35,68,60,84,68,68,1 

00,76,3,83,19,27,107,128,91,3,99,67 

3316 DATA 107,26,106,18,82,74,10,74,12 

8,98,11,75,68,84,3,59,108,4,195,68,11, 

16,7,64,50,6,0,5,84,11,18,18,132,125 

3318 DATA 128,68,27,18,18,132,125,66,1 

8,10,74,28,128,86,6 © 



ATARI® SWAT TABLE FOR: 
CAPRICCIO 




(Modified Parameters: NU 


= 2, B = 500) 


LINES 


SWAT 

CODE LENGTH LINES 


SWAT 
CODE 


LENGTH 


3100 - 


3102 


AU 


214 


3218 - 


3220 


LM 


214 


3104 


- 3106 


FZ 


215 


3222 - 


3224 


LW 


214 


T < AD , 

V i V 


3110 


Bf 


213 


3226 - 


3228 


0« 


215 


3112 


- 3114 


DU 


215 


3230 - 


3232 


HU 


213 


3116 - 


3I1B 


HI 


ii J 


3234 - 


3236 




2lZ 


3120 


- 3122 


8E 


215 




3240 


KZ 


214 


3124 - 


3126 


BD 


215 


j242 " 


3244 


IP 


213 


3128 


•T4 TA 


FV 


215 


3246 - 


3248 


OB 


215 


3132 - 


3134 


6P 


214 


3250 - 




OL 


7 1 5 


3136 


- 3138 


I'i 




3254 ' 


3256 


NC 


214 


3140 - 


3142 


HP 


215 


3258 - 


3300 


SO 


216 


3144 


- 3200 


m 


195 


3302 - 


3304 


H6 


213 


3202 - 


3204 


NJ 


215 


3306 - 


3308 


L« 


213 


3206 


- 3208 


TC 


217 


3310 - 




ON 


214 


3210 - 




IZ 


214 


3314 - 


3316 


!!=: 


215 


3214 - 


- 3216 


L6 


214 


3316 - 


3316 


6A 


53 
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Munchkin Attack is an arcade- 
style game for an Alari® with 16K 
RAM (24K disk) and a Joystick. 

Munchkin Attack is similar to 
TRS-Man, which appeared in the 
January, 1982 issue of SoftSide. It 
ma ices use, however, of the Atari's 
unique features, including Player/ 
Missile (PM) Graphics and nine col- 
ors on the screen at once. Thus, this 
is more of an adaptation than a 
translation. 

The player controls a little mouth 
as it moves around the screen, get- 
ting points for consuming dots while 
avoiding one to four computer- 
controlled creatures that try to 
munch on the mouth. If the 
creatures catch the mouth three 
times, then the game ends. There 
are, however, four special, yellow 
dots on the screen. When the mouth 
eats one of these, all the creatures 
turn blue for a short period of time, 
during which the mouth may eat the 
creatures for some extra points and 
a bit of revenge. A bel! sounds to 
warn the player just before the 
creatures return to their normal 
color. 



Variables 

A, I, N, W, WW: Loop and 
miscellaneous variables. 
AA; Memory base of PM graphics 
in pages. 

CO: Counter for setting and reset- 
ting creature colors. 
D, DI(i): Direction of mouth (D) 
and creatures — 1 =up, 2 = down, 
3 = left, 4 = right. 

DP: Temporary direction variable 
for mouth's direction. 
L: Used to determine program 
branch target location. 
NEW: Memory location (vertical) 
of creatures. 

NUMC: Number of creatures chas- 
ing you. 
SC; Score. 
ML: Mouths left. 
NUMD: Number of dots eaten. 
PB: Memory base of PM graphics 
in bytes. 

XO, YO: X and Y co-ordinates 
(PM) of mouth. 

X(i), Y(i): X and Y co-ordinates 
(PM) of creatures. 
XD, YD; Distance between mouth 
and creatures. 

XR, YR: Temporary variables for 
storing the X and Y co-ordinates 
of mouth and creature in graphics 
co-ordinates. 

Z, Zl, Z2, Z3. Z4: LOCATE 
variables; test for a collision. 

SoflSide 
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Atari BASIC 

'Hunthkin Attack' 

Author: David Plotkin 

Copyright (cl 1982 

SS SoftSide Publications, inc SS 

SS SS 

SS ss SS SS SS ss SS SS SS SS ss 



If you don't wish to type In this program, 
It is available on this month's SoftSide 
CV and DV. 

1 SOTO 10 

Subroutine to change horizontal position 
register of creatures. Placed at front of 
program to run faster. 

2 PD^E 53248+Nt3»(N^4),JtiN);IF NM THE 
N POKE 53254,)! (4) +2: POKE 53253, X<4)+4: 
POKE 53252. 1 (4H-6 

3 RETURN 

InitiaUzation. 

10 GOSUE nOOrGDSUB 1000 

20 DIM D[(51,n5),YI5);DI(0)=0:X(OMO: 

Y(0)=0;FL=0!CO=0 

40 MUf1D=0:NUMC::NUMC+l:P0KE 53273,1: IF 

NUMC/4 THEN NU!1C=4 

45 FL=0:CO=0 

50 ST=7;DI(l)=4:DH2>=3:Dll3)=3:DII4) = 

4:l(0==124:yO=52:l!(l)=72;Y(l)=20:)!!2)=17 

4:ri2)=B4:P0KE 53248, XO 

60 )!(3) = 17i:V(31=20:l((4)=72:V(4J=a4:R= 

USR(1536,PB+512+Y0,300) 

70 FDR N=l TO NUMC: POKE 53248+N+3t(N=4 

I,)1(N;:R=USR(1536,PB+512I(N<4)+334|(N= 

4) + 128IN«(N<4)+ViN),260l:NEn N 

30 IF NUMC=4 THEN POKE 53254, )t(4)+2:P0 

KE 53253, i( (4) +4: POKE 53252, )ll4)+4 

Test joystick position, 

100 )IR=(J(0-48>/2:yR=(Y0-l6)/2:ST0=ST:S 
T=ST!CK(0)-4:60T0 120 

If joystici* was trying to move the mouth 
in a direction that wouid cause it to 
collide with a wail, then ignore the 
joystick direction, and, If possibie, 
continue In the current direction. 

no ST=STO 

Go to the appropriate direction 

subroutine. 

120 ON ST SOTO 190,140,310,110,190,140 
,240,110,190,140,110 

JkS3 
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Move mouth up if possible. Award points 
for eaten dots. 

140 LOCATE 1!R+2,¥R-1,Z: LOCATE )(R,YR-1, 

21:L0CATE 1(R+3,YR-1,Z2: LOCATE )(R+2,YR- 

2.Z3 

150 IF (Z=l OR Zl OR Z2) AND STOSTO T 

HEN 110 

155 IF Z=l OR Zl OR Z2 THEN 670 

160 DD=USRI1536,PB+512+Y0,316) 

170 Y0=Y0-4:R=USR(1536,PBt512+Y0,284): 

IF Z=2 OR Z3=2 THEN COLOR 0:PLOT XR+2, 

YR-(Z=2)-2»(Z3=2):SC=SC+10:60T0 620 

180 BOTO 670 

Move mouth down if possible. Award 
points for eaten dots. 

190 LOCATE XR+2,YR+4,Z: LOCATE )(R,YR+4, 

Zl: LOCATE XR+3,YR+4,Z2: LOCATE 1(R+2,YR+ 

5,Z3 

200 IF !Z=I OR Zl OR Z2) AND STOSTO T 

HEN 110 

205 IF Z=I OR Z I OR Z2 THEN 670 

210 R=USR(1536,PB+512+Y0,316) 

220 Y0=Y0+4:R=USR(1536,PB+512+Y0,292) : 

IF Z=2 OR Z3=2 THEN COLOR 0:PLOT l(R+2, 

YR+4I(Z=2)+5I!Z3=2):SC=SC+10:60T0 620 

230 SOTO 670 

Move mouth left if possible; test for 
wrap-around. If the mouth eats a blue 
dot, then award points. If the mouth 
eats a yellow dot, then award points, 
turn creatures blue, and start the timer. 

240 LOCATE )(R-1,YR+2,Z:L0CATE )(R-1,YR, 

ZhLOCATE ){R-1,YR+3,Z2:L0CATE KR-2,YR+ 

2,Z3 

250 IF (Zl OR 22) AND STOSTO THEN 110 

255 IF Zl OR Z2 THEN 670 

260 R=USR ( 1 536 , PB+512+Y0, 300) : K0=X0-4 : 

IF W<=50 THEN X0=196 

270 POKE 53248, XO: IF Z=2 OR Z3=2 THEN 

COLOR 0:PLOT XR-(Z=2)-2t(Z3=2),YR+2:SC 

=SC+10:60T0 620 

280 IF Z=0 AND Z3=0 THEN 670 

290 COLOR OiPLOT XR-(Z=l)-2t(Z3=l),YR+ 

2:SC=SC+100:FL=1:C0=20:P0KE 705,115:P0 

KE 706,115!P0KE 707,115!P0KE 711,115 

300 SOTO 620 

Same as lines 240-300, but for rightward 
motion. 

310 LOCATE XR+4,YR+2,Z: LOCATE XR+4,YR+ 

3,Z1:L0CATE XR+4,YR,Z2!L0CATE XRt5,YR+ 

2,Z3 

320 IF (Zl OR Z2) AND STOSTO THEN 110 
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325 IF Zl OR Z2 THEN 670 

330 R=USR{1536,PB+512+Y0,308):X0=X0+4: 

IF X0>=198 THEN X0=52 

.340 POKE 53248, XO: IF Z=2 OR Z3=2 THEN 

COLOR 0:PLOT XR+4t(Z=2)+5t(Z3=2),YR+2: 

SC=SC+10:60T0 620 

350 IF Z=0 AND Z3=0 THEN 670 

360 COLOR 0:PLOT XR+4t(Z=l)+5l(Z3=I),Y 

R+2!SC=SC+100:FL=i:C0=20:P0KE 705,115: 

POKE 706,115:P0KE 707,115:P0KE 711,115 

370 SOTO 620 

Eating sound. 

620 SOUND 0,180, 12, S:FOR M=l TO 2:NEXT 
«:SOUND 0,150,12,8:F0R W=l TO 2:NEXT 
«: SOUND 0,0,0,0 

"Dots eaten" counter. Check if all the 
dots have been ingested. 

630 NUHD=NUHDtl:IF NUI1D<151 THEN BOTO 
660 

When all the dots have been eaten, 
erase the creatures, mouth, dots, and 
board; then redraw them. 

640 DD=USR(1536,PB+512+Y0,316):DD=USR( 

1536,PB+640+Y(l),316):DD=USR(1536,PB+7 

68tY(2),316) 

650 DD=USR(1536,PBt896tY(3),316):DD=US 

R(I536,PB+384+Y(4),316):60SUB 1070:60T 

40 

Print new score. 

660 POKE 656,1:P0KE 657,12:? SC; 

The creatures' logic for chasing the 
mouth. 

670 FOR N=l TO NUHC:XD=XO-X(N):YD=YO-Y 
(N):XR=(XiN)-48)/2:YR={Y(N)-16)/2 

Wrap-around for creatures. 

680 IF D1(N)=3 AND X(N)<=50 THEN X(N)= 

196:60SUB 2: NEXT N:60T0 935 

690 IF DI(N)=4 AND X(N)>=198 THEN X(N) 

=52:60SUB 2: NEXT N:60T0 935 

695 LET NE«=PB+512t(N<4)+3e4l(N=4)+N»l 

281 (N<4) 

700 L=7501(YD=0 AND XD>0)+730*(YD=0 AN 

D XD<0)+e30t(XD=0 AND YD>0)+800}(XD=0 

AND YD<0):60T0 Lt(L<>0)+860*(L=0) 

Creature chases mouth left. If possible. 

730 LOCATE XR-1,YR,Z1:L0CATE XR-l,YR+3 

,Z2:IF Zl OR Z2 THEN ON DKN) SOTO 870 

,885,895,905 

740 X(N)=X(N)-4:DI{N)=3:60SUB 2:NEXT N 

:60T0 935 

SoftSide 



Creature chases mouth right, If possible. 

750 LOCATE XR+4,YR+3,Z1:L0CATE XR+4,YR 

,Z2:IF Zl OR Z2 THEN ON Dl(N) SOTO 870 

,885,895,905 

760 XiN)=X(N)+4:DHN)=4:60SUB 2:NEXT N 

:60T0 935 

Creature chases mouth up, if possible. 

800 LOCATE XR,YR-1,Z1:L0CATE XR+3,YR-1 

,Z2:IF 21 OR Z2 THEN ON DKN) SOTO 870 

,885,895,905 

820 R=USR(1536,NEH+Y(N),316):Y(N)=V(N) 

-4:DI(N)=1:R=USR(1536,NE«+Y(N),260):NE 

XT N:60T0 935 

Creature chases mouth down, if 
possible. 

830 LOCATE XR,YR+4,ZI:L0CATE XRt3,YR+4 

,Z2:IF Zl OR Z2 THEN ON DKN) SOTO 870 

,885,895,905 

850 R=USR(1536,NEW+Y(N),316):Y(N)=Y(N) 

+4:DI(N)=2:R=USR(1536,NEM+Y(N),260):NE 

XT NiBOTO 935 

860 ON DKN) SOTO 870,885,895,905 

Creature continues up. If possible. 

870 LOCATE XR,YR-1,Z1:L0CATE XR+3,YR-I 

,Z2:IF 21 OR Z2 THEN DKN)=INT(RND(0)t 

4+l!:NEXT N:6QT0 935 

880 BOTO 820 

Creature continues down, if possible. 

885 LOCATE XR,YR+4,Z1:L0CATE XR+3,YR+4 
,Z2:1F Zl OR Z2 THEN DI(N)=INT(RND(0)t 
4+1): NEXT N:60T0 935 
890 SOTO 850 

Creature continues left, if possible. 

895 LOCATE XR-1,YR,21:L0CATE XR-l,YR+3 

,22: IF 21 OR 22 THEN DKN)=INT(RND(0)t 

4+l):NEXT N:60T0 935 

900 BOTO 740 

Creature continues right, if possible. 

905 LOCATE XR+4,YRt3,Zl:L0CATE XR+4,YR 
,22:IF Zl OR Z2 THEN DI(N)=INT(RND(0)t 
4+I):NEXT N:60T0 935 
910 BOTO 760 

Decrement timer. When timer reaches 
zero, reset the creature colors. 

935 IF FL=1 THEN C0=C0-1:IF C0<=0 THEN 
FL=0:POKE 705,85:P0KE 706,100:P0KE 70 
7,195:P0KE 711,52 

Warning bell. 

937 IF C0=5 THEN SOUND 0,50,10,8:F0R N 
=1 TO 5:NEXT «:S0UND 0,0,0,0 

continued on page 56 



Lyco Computer Marketing & Consultants 



TO ORDER 

CALL US 



TOLL FREE 800-233-8760 

In PA 1-717-398-4079 



mm 

SPECIALS 



810 Disk Drive ...$429.00 

32KRAM $ 79.00 

40032KRAM ...$179.00 



800 48K. . . $539.00 




PERCOM : In Stock 

Single Drive CALL 

Dual Drive CALL 

(Read all Atari Disks) 



PRINTERS 

OkidataSZA $479.00 

Okidata83A $719.00 

Okidata 84 $1089.00 

Citoh CALL 

Provxriter I $499.00 

Prowriter II CALL 

SMITH CORONA TP-1 . $625.00 

NEC CALL 

(Interfacing Available) 

JOYSTICKS : In Stock 

Atari CX-40 $18.00 

LeStick $34.00 

Wico Command Control $24.00 

WICO RED BALL $27.95 

STICK STAND $ 6.75 

Computer Covers 

800 $6.99 

*00 $6.99 

810 $6.99 

DISKETTES : In Stock 

Maxell MD1 . . (10) $34.00 

Maxell MD2 .. (10) $44.00 

Elephant . . .(10) $21.00 

THIRD PARTY SOFTWARE 
ATARI PROGRAM EXCHANGE 

Eastern Front 1941 $25.50 

Avalanche ..$15.50 

Outlaw/Howitzer $15.50 

Dog Daze $15 50 

Wizard of War $31 oo 

Gorf $31.00 

Frogger $26.00 

BUSINESS SOFTWARE : In Stock 

Atari Word Processing $1 09.00 

Letter Perfect $1 29.00 

TestWizzard $ 3900 

Datasam/6S $125.00 

Interlisp $1 25.00 

Monkey Wrench ........5 42. 00 

Utility Disk s 36. 5U 

Ultimate Renumber $ 15.50 



ATARI HARDWARE 

410 Cassette Recorder $75.00 

825 Printer $585.00 

830 Phone Modem $149.00 

850 Interface $164.00 

PACKAGES 

CX481 Entertainer $69.00 

CX482 Educator $125.00 

CX483 Proflrammer $49.00 

CX494 Communicator $325.00 

SOFTWARE 

CXL4012 MISSILE COMMAND $28.75 

CXL4013 ASTEROID $28.75 

CXL4020 CENTIPEDE $32.75 

CXL4022 PACMAN $32.75 

CXL401 1 STAR RAIDER $34.75 

CXL4004 BASKETBALL $26.75 

CXL4006 SUPER BREAKOUT $28.75 

CXL4008 SPACE INVADER $28.75 

CX8130 CAVERNS OF MARS $31.75 

CX41 08 HANGMAN $1 2.75 

CX41 02 KINGDOM $12.75 

CX4112 STATES & CAPITALS $12.75 

CX4114 EUROPEAN COUNTRIES. $12. 75 

CX41 09 GRAPHIT $16.75 

CX41 21 ENERGY CZAR $1 2.75 

CX41 23 SCRAM $1 9.75 

CX4101 PROGRAMMING I $19.75 

CX4106 PROGRAMMING II $22.75 

CX4117 PROGRAMMING III $22.75 

CXL401 5 TELELINK $21 .75 

CX4119 FRENCH $39.75 

CX41 1 8 GERMAN $39.75 

CX41 20 SPANISH $39.75 

CX41 20 SPANISH $39.75 

CXL4007 MUSIC COMPOSER $33.75 

CXL4002 ATARI BASIC $45.75 

CX81 26 MICROSOFT BASIC $65.75 

CXL4003 ASSEMBLER EDITOR $45.75 

CX81 26 MACROASSEMBLER $69.75 

CXL401 8 PILOT HOME $65.75 

CX405 PILOT EDUCATOR $99.75 

CX415 HOME FILING MANAGER $41.75 

CX41 4 BOOKEEPER $1 1 9.75 

NEW RELEASES 

CHOP LIFTER $27.75 

APPLE PANIC $23.75 

PREPPIE $1 9.95 



ATARI 



A WHmer Communications Company 



THIRD PARTY SOFTWARE 

for atari 800 or 400 

KBYTE 

KRAZY SHOOTOUT $35.00 

KOOS $65 00 

K-STAR PATROL S37 75 

K-RAZY ANTICS $37 75 

KRAZY KRITTERS $37 75 
OBALL JOYSTICK KIT $6 75 

AUTOMATIED SIMULATIONS 

Star Warrior $28.00 

Crush. Crumble i Chomp $23.00 

I WE CARRY MANY OTHER THIRD PARTY PRODUCTS 
YOU CAN CALL FOR PRICES ON AND ASK FOR 
I YOUR FREE ATARI PRODUCT CATALOG 



POLICY 



I In-Stock items shipped within 24 hours of order 
Personal checks require four weeks clearance 

I before shipping . PA residents add sales tax. 
All products subject to availability and price 

I Change. Add 4 % for Mastercard and Visa. 



VIC-20 $189.00 

VICI 530 DATASSETTE $67.00 

VIC1 540 DISK DRIVE $499.00 

VICI 51 5 PRINTER $355.00 

VICI 210 3K RAM $35.00 

VIC1 1 10 8K RAM $52.00 

VICI 211 A SUPER EXPANDER $53.00 

VIC-20 SOFTWARE 

VIC1212 PROGRAMMER AID $45 00 

VIC1213 VICMON $45.00 

VIC1906 SUPER ALIEN $23 .00 

VIC1914 ADVENTURE 

LAND ADVENTURE $35 00 

VICI 91 5 PRIVATE COVE 

ADVENTURE $35-00 

VIC1916 MISSION IMPOSSIBLE $35 00 

VICI 91 7 THE COUNT ADVENTURE $35 00 

VIC1919SARG0N II CHESS $35 00 

THIRD PARTY SOFTWARE 

ALIEN BLITZ $21 .00 

Omega Race $35.00 

Gorf $32.00 

16K RAM/ROM $99.00 

AMOK $21 00 

SUPER HANGMAN $1600 

SPIDERS OF MARS ^^ $45 00 



TO ORDER 
CALL TOLL FREE 

800-233-8760 

In PA 1-717-398-4079 

or send order to 

Lyco Computer 

P.O. Box 5088 

I Jersey Shore, PA 1 7740 
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Munchkin Attack continued 



Test for a hit between a creature and the 
mouth. 

940 IF PEEK!53259)=1 OR PEEK(5325i)=l 
THEN 60T0 945 

941 IF PEEK(53260)=0 THEN POKE 53278,1 
:BOTO 100 

If creatures are blue, then branch 
around the next section of code to line 
965. 

945 IF FL=1 THEN 60T0 965 

Decrement the number of mouths left. 
Make the sound signifying the loss of a 
mouth. If all the mouths are gone, Jump 
to the end-of-game routine, otherwise 
erase the creatures and mouth, and 
place them In their starting positions. 

950 HL=HL-1:F0R H=10 TO 60 STEP 10:S0U 
ND 0,lil,10,8:FOR «W=1 TO 50:NEn BWiNEX 
T «:SOUND 0,0,0,0: IF I1L=0 THEN 60T0 13 
50 

955 FOR N=l TO NUMC:R=USR(1536,PB+512I 
(N<4)+3B4I(N=4)+128INIIN<4)+Y!N),316): 
NEXT N:R=USR(1536,PB+512+Y0,316) 
960 POKE 53278, 1:B0T0 50 

Erase an eaten creature, and place it 
back in its starting location. Increment 
score. 

965 IF PEEK (53260)00 THEN 60T0 (970+5 

» (PEEK (53260) =4) +10t (PEEK (53260) =8!) 

967 IF PEEK (53259) =1 OR PEEK (53256)=! 

THEN GOTO 985 

970 R=USR(1536,PB+640+Y(l),316):Y(n=2 

0:X(1)=72:P0KE 53249, 72: R=USR( 1536, PB+ 

640+Y(l), 260): GOTO 992 

975 R=USR(1536,PB+768+Y(2),316):Y(2)=8 

4:X(2)=176:P0KE 53250, 176:R=USR(1536,P 

B+768+Y(2),260):60T0 992 

980 R=USR(1536,PB+896tY(3),316):Y(3)=2 



0!X(3)=176:P0KE 






176:R=USfi(1536,P 



B+896+Y(3),260):B0T0 992 
985 R=USR(1536,PB+384+Y(4),316):Y(4)=S 
4:X(4)=72:P0KE 53255,72:P0KE 53254,72: 
POKE 53253, 74: POKE 53252,76 
990 R=USR(1536,PB+384+Y(4),260) 
992 POKE 53278, l:SC=SC+INT(RND(0)t4+l) 
I200:P0KE 656,1:P0KE 657,12:? SC; 
995 SOUND 0,10,10,8:FOR W=l TO 50:NEXT 
W: SOUND 0,0,0,0:BOTO 100 

Initialize PM graphics. Draw board. 

1000 AA=PEEK(106)-12:PB=256tAA 

1010 FOR A=PB TO PB+1024:P0KE A,0:NEXT 

A 
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1020 FOR A=1536 TO 1560:READ hPOKE A, 
I: NEXT A 

1030 DATA 104,104,133,204,104,133,203, 
104,133,207,104,133,206,160,0,177,206, 
145,203,200,192,8,208,247,96 
1040 FOR A=260 TO 323: READ I: POKE A, I: 
NEXT A 

1050 DATA 24,60,126,90,219,255,255,170 
,24,60,126,90,219,255,255,85 
1060 DATA 24,60,126,255,255,126,60,24, 
68,70,199,239,239,126,60,24 
1065 DATA 24,60,126,239,239,199,70,68, 
56,124,254,31,7,30,252,56,28,62,127,24 
8,224,120,63,28,0,0,0,0,0,0,0,0 
1070 GRAPHICS 5:P0KE 710,0:P0KE 752,1: 
POKE 559,46:P0KE 54279,AA 
1080 POKE 53277, 3: POKE 623,17 
1090 POKE 704,I8:P0KE 705,35:P0KE 706, 
100:P0KE 707,195:P0KE 709,165:P0KE 711 
,52 

1100 COLOR 1:PL0T 0,0:DRAttTO 79,0:PL0T 
0,I:DRABTO 79,1: PLOT 0,39:DRAWT0 79,3 
9:PL0T 0,38:DRAWTQ 79,38 
1110 PLOT 0,0:DRAHTO 0,17:DRAWT0 25,17 
:DRAWTO 25,6:PL0T 1,0:DRAKT0 1,16:DRA« 
TO 24,16:DRA«T0 24,6 
1120 PLOT 0,39:DRAWT0 0,22:DRAMT0 25,2 
2:DRAHT0 25,33:PL0T 1,39:DRAMT0 1,23:D 
RAWTO 24,23:DRAWT0 24,33 
1130 PLOT 79,0:DRAHT0 79,17:DRA«T0 54, 
17:DRAMT0 54,6:PL0T 78,0:DRAIilT0 78,16: 
DRAWTO 55,16:DRA«T0 55,6 
1140 PLOT 79,39:DRAHT0 79,22:DRAWT0 54 
,22: DRAWTO 54,33:PL0T 78,39:DRflBT0 78, 
23:DRA«T0 55,23:DRA«T0 55,33 
1150 PLOT 30,6:DRA«T0 30,17:DRA«T0 49, 
17:DRAHT0 49,6:PL0T 31,6:DRA«T0 31,16: 
DRAWTO 48,16:DRA«T0 48,6 
1160 PLOT 30,33:DRfiWT0 30, 22: DRAWTO 49 
,22:DRABT0 49,33:PL0T 31,33:DRAWT0 31, 
23:DRAWT0 48,23:DRAWT0 48,33 
1170 FOR Y=6 TO IhPLOT 6,Y:DRA»T0 19, 
Y:PLOT 36,Y:DRA«T0 43,Y:PL0T 60,Y:DRA« 



TO 



:NEXT Y 



1180 FOR Y=28 TO 33:PL0T 6,Y:DRAWT0 19 
,Y:PL0T 36,Y:DRAHT0 43,Y:PL0T 60,Y:DRA 
WTO 73,Y:NEXT Y 

1200 COLOR 2: FOR 1=4 TO 76 STEP 3: PLOT 
X,4:PL0T X,20:PL0T X,36:NEXT X:COLOR 
0:PLOT 4,20:PL0T 76,20:C0L0R 2 
1210 FOR X=4 TO 22 STEP 3:PL0T X,14:PL 
OT X+54,14:PL0T X,26:PL0T X+54,26:NEXT 

1220 FOR X=34 TO 46 STEP 3:PL0T X,14:P 
LOT X,26:NEXT X 

1230 Y=7:60SUB 1250:Y=11:B0SUB 1250:Y= 
29:B0SUB 1250:Y=32:60SUB 1250 
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1240 GOTO 1260 

1250 PLOT 4,Y:PL0T 22,Y:PLQT 28,Y:PL0T 
34,Y:PL0T 46,Y:PL0T 52,Y:PL0T 58,Y:PL 
OT 76, Y: RETURN 

1260 PLOT 28,14:PL0T 28,17:PL0T 28,23: 
PLOT 28,26:PL0T 52,14:PL0T 52,17:PL0T 
52,23:PL0T 52,26 

1265 COLOR 1:PL0T 13,I4:F10T 67,14:PLQ 
T !3,26:PL0T 67,26 

1270 POKE 656,0':P0KE 657, 12:'' "HUNCHKI 
N ATTACK":POKE 656,1:P0KE 657,5:? "SCO 
RE":POKE 656,1:P0K£ 657,12:? SC; 
1280 RETURN 

Beginning of game graphics. 

1300 GRAPHICS 2+16 

1310 POSITION 2,5:7 #6;"HUNCHKIN ATTAC 

K" 

1320 FOR W=l TO 25:SETC0L0R 0,RND(0)tl 

5,7:S0UND 0,WI20,12,6:FQR WW=1 TO 50:N 

EXT WW: NEXT W: SOUND 0,0,0,0 

1330 RETURN 

End of game. 

1350 POKE 656, 2: POKE 657, h'^ "PRESS FI 

RE TO PLAY AGAIN...." 

1360 IF STRI8(0)=1 THEN BOTO 1360 

1370 Y(0)=Y0:F0R N=0 TO 4:R=USR(1536,P 

B+512+Ntl28l!N<4)+384l(N=4)+Y(N).316): 

NEXT N:B0SUB !070:60T0 30 © 
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' SWAT TABLE FOR: 


MUNCHKIN ATTACK 








SWAT 




LINES 


CODE 


LENGTH 


! 


- 50 


EG 


602 


bO 


i "'A 


UP 


=i68 


1 .1., 


- 205 


CM 


so: 


■- K / 
^ i'. 


- 270 


BU 


537 


2S0 


- 340 


HJ 


547 


350 


- 640 


AT 


54! 


i5C 


- 700 


QU 


iz: 


?30 


- 830 


RN 


583 


B5!i 


- 905 


BR 


593 


-:\-:- 


- 950 


PE 


532 


°55 


- 975 


EH 


643 


■-80 


- 995 


HM 


jijv 


1000 


- 1070 


RJ 


548 


1030 


- 1120 


XS 


601 


1130 


- 1160 


ZS 


5SS 


\\-:-: 


- 1230 


FP 


584 


\'M 


- 1300 


UT 


520 


1310 


- 13^0 


JG 


462 



^^ WE DEAL EXCLUSI> 




XCLUSIVELY IN PRODUCTS 
FOR THE ATARI {THE BEST) COMPUTER 




BAJA BUGGY 





by 
GAMESTAR 

$29.60 



If you're looking for a fast action driving 
game then we recommend this one. Good 
graphics and sound. 



FROGGER 




This is the 

genuine FROGGER 

game that you see 

in the arcades. IWade by the'^same people 

that made Jawbreaker (One of the top ten 

sellers.) ^^ on-line 

32KDisk 16K Tape $31.40 



^m 




♦ASTRO BATTLES 
•LAZER ATTACK 
•SPACE WARP 
♦FLAG SHIP 
by 

ROKLAN 

MIDWAY 



Just like the arcade game that has been 
so popular. This is one of our BEST sellers 
for all ages. 



24K 

$35.10 Disk 



$39.90 Cart 



HARDWARE 

Prices listed are the CASH discount price, charge 
prices are slightly higher. 



800 Computer 18K 

800 Computer 48K 

400 Computer (used) 

810 Disk Drive 

850 Interface 

410 Recorder 

16K Ram module 

32K Ram module 

Percom Disk Drive 

48K Ram module for 400 

WICO JOYSTICK 

TracBailcontrolier 

800/400 Dust cover 

10 Blank Disks 

Mark II Modern 

Allen Group Synthesizer 

Epson MX-80l=T/Pius 

Amdek Color 1 monitor 

12' Joystick Extension Cord 

Computer Paper 1000 8'/! x 11 



$600 
$678 
$199 
$448 
$178 
$78 
$69 
$89 
$648 
$168 
$26 
$63 
$9 
$28 
$99 
$153 
$588 
$387 
$10 
$17 



Trade In your 400 lor a NEW 800 Computsr. Call 
for details. 



SOFTWARE 

ZAXXON 

Now you can get that powerful 3-D 
game for the Atari. Made by one of the 
BEST game makers, Datasoft. Order 
early to get yours. D $35.10 

WIZARD & THE PRINCESS 
A terrific HI-RES graphics adventure 
that is one of the best for the Atari 
40K Disk $29.90 

EASTERN FRONT 
The MOST popular of all the APX pro- 
grams and truly one of the best war 
games for the Atari. D,T $27.90 

SAMMY THE SEA SERPENT 
A must for the little computerists ages 
4-7. The kiddies LOVE this one and 
"Sammy" too. Tape $15.90 

A colorful war simulation for either one 
or two players. If you enjoy wargaming, 
then this great game is certain to 
please. 32K Disk $22.50 

THRESHOLD 
Superb graphics makes this one of the 
BEST space games for the Atari. Fast 
paced and arcade quality make this a 
must. 40K Disk $35.10 

DE RE ATARI 
This manual is a favorite among the 
serious programmers. Learn the many 
secrets of the Atari. $17.90 

MM) pHV) VviiBMMIlBHHfll 

ATARI PRODUCTS CATALOG 

(Includes program descriptions) 

with any order or 

send $1.00 refundable with order 

Send your name to get our 

FREE monthly flyers 




METEOR 



STORM 




The city is about to be destroyed and 
ONLY you can save its people from 
destruction. FAST, arcade type action 
game. 24^ pisk 

16KTape $29.95 




A SUPER graphic game in which you are 
the miner and must watch out for mine 
flooding and monsters of the deep. 





The aliens have 
landed and It's 
your job to 
the city 
(If you 

cani) TOP RATE 
GAME, ARCADE 
QUALITY 
RES Graphics & 

Sound., 6K TAPE 
32K DISK 

$26.90 




VK4' 



m TO ORDER CALL (503) 683-5361 



HOW TO ORDER: Send check or money order or phone your order using your charge 
card. Ask about our 48 hour delivery service. Shipping on prograins is $2.00 per order 
In USA or $3.90 for the 48 hour AIR service. Call for Hardware shipping costs. Prices 
subject to price change without notice. 



Store Hours 
8 am - 6 pm 
Mon. - Sat. 



2160 West 11th Ave., Eugene, Oregon 97402 
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ATA RI- f ig-FO RTH 

'^This article is the result 

of an attempt to write an 

interactive tutorial on 

using this version of 

fig-FORTH. Read the 

text and try the examples 

on your Atari as we go 

along. Above all, have 

fun. " 



by H. E. Striepe 
Documentation by H. E. Striepe and Dave Flory 



Atari fig-FORTH requires an Atari 400/800 with 32K RAM 
and AisV. drive. It is included as tlie bonus program on issue 36 
Atari DV. See tlie Bind-in Card elsewhere in this issue to order 
this month's dislc. 

Welcome to the world of Atari fig-Forth. We are trying to 
make FORTH easy for you to learn and use. Since we are learning 
too, we would appreciate any feedback you may have on this ver- 
sion oi fig-FORTH, and the included documentation. Please send 
any comments to Team Atari, 4029 Payne Avenue, San Jose, CA 
95117, or leave E-mail on CompuServe for [70525,434]. We'll try 
to answer all correspondence. 

To start, boot the FORTH disk. When you get the prompt 
"oK", type 30 LOAD and press RETURN. Be prepared to wait. 
Various messages will be displayed — ignore them for now. After 
you get the "oK" prompt again, you can get a list of all the cur- 
rently defined FORTH verbs by typing VLIST. CTRL 1 will 
freeze the display just as in BASIC. You may notice that there are 
many BASIC commands included in FORTH. After you've seen 
enough, type UE. 



UL, LL, T, N, P, INDEX 

FORTH works with blocks of information called screens. You 
should be looking at the upper half of screen zero right now. 
Atari fig-FORTH saves the last two screens EDITed, LOADed, 
or LISTed in memory. One screen is displayed, while the other is 
stored in a buffer. This is especially handy when comparing 
screens from different areas of the disk. Since each screen is too 
large to be shown on the display at one time, only half of the 
screen is shown. You can choose between the upper half and the 
lower half by using the UL and LL verbs. UL selects the Up- 
per Limit of the currently displayed screen, while LL selects the 
Lower Limit. Try looking at the entire contents of screen by us- 



ing the UL and LL verbs. The verb T allows you to Toggle be- 
tween the two available screens. Since there is no other screen in 
the buffer yet, type 1 UE to get the upper half of screen 1. Now 
try the T, as well as the UL and LL verbs. The P verb will fetch 
the screen number that is one less than the currently displayed 
screen. Type P and then use the T verb to get back. The N verb 
does the opposite. It loads the next higher numbered screen. 
Another handy verb to learn is xx yy INDEX, (xx and yy are the 
starting and ending screens, respectively.) 

INDEX is the verb you use to find out what is on your FORTH 
disk. It shows you the first line of each screen on the disk. It's a 
good practice to make the first hne of any screen you write a short 
description of what is on the screen. Then, when you use INDEX, 
you can get a quick Ust of the contents which can also be sent to 
the printer. To use the INDEX verb, you must specify a starting 
and ending screen number between $00 and $4D. To see the entire 
contents of a FORTH disk, type 4D INDEX. 



LPOPEN, LPINDEX, LIST, LISTLP, SHOW, 
SHOWLP 

To print the INDEX, you need to open the printer device for 
output. LPOPEN is the verb to do this. It need only be executed 
once. The INDEX verb works only on the screen. To get a printed 
INDEX, use the xx yy LPINDEX verb. This verb functions exact- 
ly like INDEX. To get an INDEX of the entire FORTH disk, type 
4D LPINDEX. However if you wish to see an entire screen at 
once, there are two verbs that will do this: xx LIST and xx 
LISTLP (XX being the screen number). The first will LIST to the 
display; the second to the printer. Optionally, two screens may be 
shown at once. The xx yy SHOW verb displays all screens be- 
tween XX and yy consecutively on the display, while xx yy 
SHOWLP prints them two at a time, side by side, on a page. 
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SYS, BACKUP, DoFORget, SETPHYS, 
RESPHYS, FORMAT, MAKEBOOT, SETSYS 

You may have wondered how to duplicate this disk. The nor- 
mal DOS copy routines will not work, as there is no directory on a 
FORTH disk. You can use SUPERDUP, ARCHIVE, or any 
other sector copying utility. Or you can use the BACKUP verb. 
Since FORTH does not use the Atari DOS, it has a limited set of 
verbs for disk operations that can be accessed through the SYS 
verb. After SYS has loaded, you will be given a menu of what 
DOS operations can be performed. The BACKUP verb allows 
you to make a copy on a one disk system. DoFORget allows a 
protected dictionary verb to be erased, whereas the normal 
FORGET verb will only erase verbs defined after booting, xx 
SETPHYS sets the starting location of screen on the disk. 
RESPHYS changes the start location of screen to the previous 
value. To modify the RESPHYS location, simply specify SET- 
PHYS twice — the first time for the RESPHYS location, the 
second for SETPHYS. xx FORMAT will format the disk in drive 
XX with the standard FORTH format. MAKEBOOT generates a 
compiled listing of all currently defined verbs for loading in when 
you boot. These verbs will then be part of the runtime system, 
erasable only with the DoFORget verb. SETSYS will store all 
boot-up parameters pertaining to display colors and margins, and 
FORTH options such as error messages, stack display, etc. Note: 
Do not move any of the screens 1 through 9 and F! 



STON, STOF, WARNON, WARNOFF, GS, 

WS, BS, NS, HX, DX, BX 

If a display of the stack is desired, STON and STOFF will turn 
the stack display on and off respectively. To get long error 
messages, type WARNON. To turn them off and get only 
ipessage numbers, type WARNOFF. There are a number of verbs 
currently defined for altering the display colors: GS = green 
screen, WS = white screen, NS = normal screen, and BS = black 
screen. Give them a try and see which ones you like. The number 
base for numeric entries can be altered to best suit the needs of the 
user: HX=hexidecimal, DX= decimal, and BX= binary. Note 
that the stack display only shows the lowest four digits of the 
items currently on the stack. This means that the stack will show 
2345 after entering the line DX 12345, even though all digits are 
still there. The color of the display border will change to remind 
you which number base you are in. 



General Information 

Now that we have some basic tools with which to find our way 
around the disk, let's turn to some general information on how 
things are stored. This month's SoftSide DV contains a minimal 
subset of the available verbs in standard fig-FORTH when it is 
first booted. Many other verbs are stored on the disk in the form 
of source screens that can be loaded as desired. When you type 30 
LOAD, a special screen is executed that causes all of the other 
verb screens to be loaded and added to the verb list. You got a list 
of all available verbs when you typed VLIST earlier. It is 
recommended that you make a copy of the disk with all the verbs 
loaded, and another with only the minimal subset in memory. If a 
smaller system is desired after making a copy, use the FORGET 
and DoFORget verbs. The more verbs compiled in RAM, the less 
room you'll have to work within your own applications. Inciden- 
tally, a faster form of the LOAD verb may be used on screens 
known to be error free, xx L& shuts of the screen and inhibits er- 
ror messages normally generated with xx LOAD. This verb does 
not exist in the minimal system, but is active after typing 30 
LOAD. 



FORTH, EDITOR, ASSEMBLER, L#ON, 
L#OFF, DOIT, WIPE 

There are three different modes of operation in the Atari fig- 
FORTH system: FORTH, EDITOR, and ASSEMBLER. The 
format you have been using so far is the EDITOR format. There 
are two different ways of viewing screens while in the EDITOR. 
There is a split screen editing window accessible with the verbs xx 
UE and xx LE. UE selects the upper half of screen xx while LE 
selects the lower. The other major format is the xx LIST or xx L. 
format. In this format, you have to use the CTRL 1 key to stop 
and start the scrolling of the screen. By typing L#ON you will get 
line numbers on the editing screen to facilitate use of line edit 
verbs. If you want to get rid of them later, just type L#OFF and 
they will go. This works in either format. 

Screen OD is blank so you can try some screen editing. Type 
OD UE to go there and then type on the upper edit window. When 
done, use the cursor arrow keys to move down to the command 
window, (the area containing the word DOIT) and press the 
RETURN key. The DOIT verb takes the information in the edit 
window and puts it into a screen. Then if you type FH, the entire 
screen will be written to disk. To erase it, use the xx WIPE verb 
(or just W while in the editor). 

REV.F has a number of bug fixes for REV.A OS. It also in- 
tercepts the DOSINI vector during BOOT, and at WARM- 
START (RESET). This makes it possible to set the screen colors 
and margins for boot up and reset. Simply set your margins and 
screen colors before calling SYS, and select STACKON or 
STACKOFF. Then use the verbs SETSYS, and MAKEBOOT. 
Your new disk will now boot in your colors, and have your 
margins. 

You can also hook in a Machine Language subroutine at this 
point. It must have been defined prior to calling SYS. After call- 
ing SYS, use the the verb HOOK xxxx (where xxxx is your 
CODEd assembler verb). If you think you've made a mistake, 
UNHOOK reverses the process. Note: Your routine is called as a 
machine subroutine, and must end with an assembler RTS. 

The screen editor now has a keyboard intercept, so you 
can't accidentally hit RETURN while editing the upper window. 
To override this while editing, hit CTRL (or SHIFT) RETURN. 
Note that many screens have been changed from the previous 
revision, so full compilation requires staying with one group of 
source screens. The enhanced SYS verbs should not be used with 
kernels of previous revisions. 



Player/Missile Demo 

Now, let's take a look at the player/missile demo. To do this, 
type 3A L& (or 3A LOAD). It's also a good idea to print out this 
screen for reference, as we will be using it in the comments that 
follow. To do this, type LPOPEN if you have not done so 
already, and t)T)e 3A LISTLP (or 3A LIST for those without 
printers). Here is a Usting of the new verbs: 



OVP: P/M vertical position. 

OHP: P/M horizontal position. 

OVPOLD: P/M old vertical position. 

GETPS: get player shape and place in P/M memory space. 

SPLAY: show player. 

RUNIT: demo program code. 

B/H: converts a binary number to hex and decimal. 



The 2A in front of COLPM! is the color of the player in HEX. 
The first digit indicates the color, and the second is the 
luminance. The first number in front of SIZE! is the P/M size, 
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DAISY WHEEL PRINTERS. 



SMITH CORONA TPI 
BROTHER HR-1 
DAISYWRITER 2000 
DIABLO 620/630 KSR 
QUME SPRINT 9 KSR 



COMPUTER SYSTEMS... 



ATARI 800 
TRS-80 MODEL III 



$$$ CALL FOR PRICE $$$ 



You won't believe it!!! 



Rainbow 



P & P CORPORATION 

PO BOX 362 • HADDONRELD. NJ 08033 ^ 264 

800-257-61 70 in NJ can 609-428-3900 



April 15th is just 
around the 
corner 




The ACCOUNTANT 

Finance Data Base System 

Optional VisiCalc" Interface Available 

BE A MONEY MASTER 

Define up to 63 tax codes and save when you prepare 
your returns. Available for APPLE" and IBM^PC. 

"Among bookkeeping programs, Decision Support 
Softvtrare's ACCOUNTANT ($129) earns high marks 

and is easy to use." —Money Magazine, Nov. 1982 

(800) 368-2022 

Decision Support Software 

1438 Ironwood Drive. McLean, VA 22101 (703| 241-8316 

Add S3.00 shipping and handling. Virginia residents add 4% 

APPLE", IBM~, and VtsCaic' am tradama*! of APPLE Compular, Inc. IBM Coip., and Vatoip, Ine taspacIivBty 



the second is the P/M number. The numbers for GETPS in 
SPLAY are: 

1. The number of screen holding P/M shape data. 

2. The offset into the screen vi^here the P/M data starts. 

3. The number of bytes for P/M data. 

4. The horizontal position to show player. 

If you are using this routine to store P/M data on disk, you 
must be careful to place the data correctly on the data screen. 
Count the bytes carefully and enter the data in ATASCII 
characters. This is done by using BDUMP to enter the hex 
numbers into the RAM buffer position corresponding to the 
screen. The B/H verb is very useful in converting a P/M bit pat- 
tern in binary to its hex and decimal equivalents. This verb was 
added when you loaded the P/M demo screen (3A). To become 
more familiar with its use, try converting a P/M box shape such 
as the one that follows. (Note: The portions in italics are com- 
puter generated responses.) 



BX 

11111111 B/H 
10000001 B/H 
10000001 B/H 
11111111 B/H 



HEX=FFDEC. =255 
HEX =81 DEC. =129 
HEX =81 DEC. =129 
HEX =FFDEC. =255 



To use B/H you must be in BX or binary base. Then, enter the 
binary shape line, type B/H and press RETURN. FORTH will 
type the HEX and DEC. numbers for you. To put these numbers 
onto the disk without having to look up the Atari control keys in 
the table, use the BDUMP verb. It works this way. You type the 
following: OF BLOCK 3E0 + DUP BDUMP. This gives you eight 
character positions of P/M data on screen number OF displayed 
on the monitor. You then count in the number of spaces you want 
the data and enter it on the screen, using the cursor and pressing 
RETURN on the same line. It looks similar to this: 

HX OF BLOCK 3E0 + DUP BDUMP 

OCEO 99 5A 3C FF 7E 24 3C 81 
oK 

The XX BLOCK verb locates the start of screen xx in memory. 
The 3E0 + DUP make the starting and ending locations for the 
XX yy BDUMP verb, xx is the starting memory address, and yy is 
the ending. 

In this instance, the player's current location is displayed at 
memory location $0520. (Note that your address may be dif- 
ferent.) You can alter the memory locations displayed in the 
BDUMP. Just move the cursor over the line you wish to change. 
By typing over the hex values displayed with the values obtained 
from the B/H verbs, and typing return, you can alter the P/M 
data. This is a temporary change, however. To permanently save 
the new shape, you must edit the screen (OF UE) or mark it as up- 
dated (UPDATE), and store the new buffer on the disk (DOIT 
and FLUSH). 

To see the shape and run the Player/Missile demo, type 
SPLAY and RUNIT. This will display the shape under the control 
of joystick 0. You will notice that the shape "hides" behind the 
text window. You can draw something on the playfield and ex- 
periment with the P/M priority register (GPRIOR) to create other 
obstacles. 

The graphics verbs in this version of Atari fig-FORTH are very 
like those you use in BASIC except that, as you have noted here, 
the numbers come before, not after, the commands. 

XX C. = COLOR XX 

XX OR. = GRAPHICS xx 

XX yy POS. = POSITION xx, yy 

XX yy DR. = DRAWTO xx, yy 

xx yy zz SE. = SETCOLOR xx, yy, zz 

ETC. 
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The fill verb is xx XI018. It requires the same setup as the 
BASIC version, with xx being the fill color register. Try this 
example: 

DX 8 GR. 1 C. 159 PL. 
239 80 DR. 79 80 DR. 
158 1 POS. 1 XI018 



Stack Display 

One of the nice features of this system is the stack display. To 
use it, just type STACKON or STON. Then type a few numbers 
and press RETURN. You will see the numbers on the stack 
display at the top of your monitor screen. To tiu-n it off when un- 
wanted, type STACKOFF or STOP. You will find the stack 
display very. useful as you start defining your own verbs. You can 
go through each step in the word, one at a time, and watch what it 
does to the stack. The stack is the single most difficuh thing for 
most beginning FORTH users to understand, and this display is 
used by even the most experienced programmers. 

Put some numbers on the stack and try some of the math verbs 
such as +, /, -, and *. Use SWAP, ROT, ., DROP, etc., and 
observe their effects. Try mixing the HX (hexadecimal), DX 
(decimal), and BX (binary) modes. Watch carefully how each is 
displayed on the stack. Base conversions are a snap when you 
alternate between number bases. For example, type: 

HX B6 BX . 

lOUOUO oK 



DECOMPILER, DCP, ZZ 

Now we come to one of the most useful and powerful verbs in 
this version of the FORTH vocabulary — DECOMP. To use it, 
just type DECOMP xxxx, DCP xxxx, or ZZ xxxx; where xxxx is 
the word you want to decompile or take apart. This word works 
on even the primitive words in the fig-FORTH kernel. Try a few 
of the simple words first, like GS or NS. You will find that the 
numbers above 0,1, and 2 are all prefixed by the verb LIT. The 
first three are used so much that they are predefined as FORTH 
words. The verb LIT tells FORTH that the numbers are to be 
taken as literal values. To give you an idea how this works, try 
typing in the following verb definition and then decompUng it. 

DX 

: AS 26 709 C! 18 710 C! 
16 712 C! ; HX 

You now have another word available to you — AS, which 
stands for amber screen. Try to decompile it. Study the display. 
(Try decompiling the verbs that make up AS, like C! or ;S.) If you 
like, you can make this a permanent part of your disk by using 
MAKEBOOT to write out all the compiled verbs you have in 
RAM. To remove it from memory, type FORGET AS. 



Texts On FORTH 



If you are new to FORTH, this should give you enough to think 
about for quite awhile. We haven't tried to make you a program- 
mer, but only to introduce you to the features of this version of 
the language and help you over a few of the initial rough spots. 

There are several good books for people new to FORTH. The 
one we found most helpful was Discover FORTH, published by 
McGraw Hill. Another excellent book, and probably the best 
choice if you can afford to buy only one, is Starting Forth by Leo 
Brodie. (See review elsewhere in this issue.) published by 
FORTH, Inc. 
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auesUor the Bcroll 

A New-Generation Adventure 
Written by Dan Holme 

You, as the mighty Koran, search for the 
scroll of Xarlog. You will seek TRUTH If 
you find it, you may leap the Great Diviciing 
Wall and on to the QUEST FOR LOVE, but 
your search could take you in another 
direction, down a path to DEATH! 
Are you daring, imaginative and defiant, 
wilting to seek the truth"^ Are you prepared 
to meet challenge? _!.,,_, 

24K Cassette tlllhl.HvJ 
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is a professional Busmess 
Package which for a period of six months 
has been used by retailers throughout 
the United States and Canada. 

REPORTS 

• COST AVERAGING 

• PROFITS 

• COST OF GOODS SOLD 

• PHYSICAL CHECK LIST 

• RETAIL PRICE LIST 

• TURN REPORT 

• CUSTOMER BACK ORDER 

• VENDOR BACK ORDER 

• PURCHASE ORDERS 

• RECEIVING RECORDS 

FEATURES 

• DEFINABLE PASSWORD OPER 

• 40 COLUfVIN CASH RECEIPT 

• 80 COLUfVIN CASH RECEIPT 

• tVIACH. LANG. ROUTINES 

• SUPPORTS 1 OR 2 DRIVES 

• COtviPLETE INV. CONTROL 

• INVOICE NUfVIBERING 

• 48K^700 ITEh/IS 

• 32K^ 350 ITEMS 



SRR.qa 



Csssette Chechbool^ 

Balancer Program 

• Multiple Accounts 

• Creative Use of Graphics 
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LjLiI.uJLIIIJI.1. I MCI MI_inT 

fDrihEfiTfiBi4Da/aaa 

personal computer 

• Utilizes 64K RAMS 

• Plug in Installation for the 800 
Provides up to 96K RAM 

• Compatible With All Languages 
and the New B-ROMS 

• Access is as Simple as a Poke 
or Store Command 
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PErsnnal 

FinancE 
On Cassette 

• Handles 100 catagones 

• Incomes. Balance Sheets 

• Checkbook & Credit Card 

• Totals for categories 

• Personal S Business 
32K Disk or Cassette 

3BR.R5 
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ATARI SUPER 
LEDGER, written by a CPA. to 
be an accurate, tiexfbfe method 
of keeping business records. 
Can be adapted to a variety of 
businesses. Designed to ac- 
comodate five journals. Three 
are supplied, and 'COMING 
SOON*. Payables, Receivables 
& Payroll. Supports Cash Re- 
ceipts, Cash Disbursements 
and General Journal. 

FEATURES 

• All input IS verified before 

processing 

• 5000 Entries per journal 

per month 

• Cash or accrual 

• General ledger transaction 

reviews on screen or printer 

• Up to 300 accounts 

• Prints income statement 

and balance sheet 

• Fail-sate disk operation 
• Compatable with ACR 

48K Disk 



SHERLDCHi 

Disk utility 




ALL THIS IN ONE 

POWERFUL PACKAGE 

FEATURES: 

• Disk-Disassembler 

• Mach. Language Speed 
• Sector Dump in HEX 

or ASCII Formats 

• Change/Delete Bytes 

in Sectors 

• Complete Map of Standard 
and Non Standard Sectors 

• Works With All Formats 
• Byte Search Capabilities 

• Sector by Sector Disk 

Copy Utility 



by THE 



th 



Works 
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DEALER INQUIRIES INVITED 



Orderline: (303) 427-9036 



VISA And MC Accepted 
$2.00 Shipping and Handling 
Please add SI .50 for COD 
COLO. RES., PLEASE ADD 6.5% TAX 

'ATARI is a registered trademark 
ot ATARI, INC. 



High 

Country 

Microsystems 



p. O. BOX21147 

Denver, Co. B0221 
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We wish you the best of luck and hope that you will keep us up- 
to-date on your extensions to this language. We will try to act as a 
clearing house for Atari FORTH people. As we come up with 
more features, we will add them to the package. We will try to 
upload the new additions onto CompuServe ACCESS area so you 
can get free updates. We suggest that you keep the original source 
disk unchanged, so that you can recompile your working kernel as 
you get more updates. If someone wishes to write a terminal pro- 
gram in Atari fig-FORTH, we will make it available inunediately, 
so that we can all communicate FORTH material more easily, 
without typing in the screens. Note that Atari fig-FORTH is 
pubUc domain. Please feel free to copy the FORTH system on 
your SoftSide Z)F and pass it around to everyone you know. The 
following is a listing of some of the specialized Atari fig-FORTH 
verbs. Most are active only after a full load (screen 30 LOAD). 



Editor Commands and Functions 

EDITOR: VOCABULARY name. 

XX EDIT: Enter editor on screen xx. 

L, N, P: List current, next, or previous screens. 

LL: List lower half of current edit screen. 

UL: List upper half of current edit screen. 

DOIT: Take top 16 lines of screen and place them into the top or 

bottom half (LL or UL) of the edit screen. 

XX yy COPY: Copy screen xx to screen yy. No change to screen 

XX. 

XX LIST: Set screen number to xx and list it. 

XX yy SHOW: List screens xx to yy inclusive. 

XX yy INDEX: List first line of screens xx through yy. 

FLUSH: Return to FORTH and write out all updated screens. 

UPDATE: Mark screen as updated. 



XX BL: Blank out line xx (erase line). 
XX $: Text following $ will replace line xx and go into PAD. 
XX %: Text following "la will be inserted after line xx and go in- 
to PAD. 
XX yy CL: Copies line xx of screen yy into PAD. 



Fast Edit Commands 

EDT: Same as EDITOR. 

FORTH: Exits EDITOR without action. 

XX UE: Same as xx EDIT UL. 

XX LE: Same as xx EDIT LL. 

N: Edit next upper screen. 

N.: Edit next lower screen. 

P: Edit previous upper screen. 

P.: Edit previous lower screen. 

T: Edit other upper screen in buffer. 

T.: Edit other lower screen in buffer. 

FH: Same as FLUSH. 

XX WIPE: Clear screen xx. 

W: Clears screen being edited. Requires a response of 

RETURN to work, or N to cancel. 

XX LOAD: FLUSH screen being edited, and LOAD xx. 

L#ON: Turn on line number display. 

L#OFF: Turns off line number display. 

SOUNDOFF: Eliminate audible cue (the beep heard for various 

editing commands). 

SOUNDON: Restore audible cue. 



Editor Line Editing Commands 

XX TL: Type line xx into PAD and display it. 

XX HL: Type line xx into PAD but don't display it. 

XX DL: Delete line xx and put into PAD. 

xx IL: Insert line in PAD after line xx. 

XX RL: Replace line xx with line in PAD. 

XX SL: Spread lines at xx (insert blank line). 



fig-FORTH 1.4S Commands 

xxyy zz COPIES: Move screens xx through yy to the screen zz 

on up. zz=xx, zz+1 zz + nn = yy. 

XX yy DUPLICATE: Duplicate screens xx through yy onto 
another disk in a single drive system. 
SYS: Loads BOOTMAKER and other disk related words. 
STACKON: Turn on stack display. 
STACKOFF: Turn off stack display. 
STON: STACKON. 
STOP: STACKOFF. 

WARNON: Display long error messages. 
WARNOFF: Display error number codes only. 
DRAIN: EMPTY-BUFFERS. 
XX yy LZERO; Clears screens xx though yy. 
XX SETPHYS: Set PHYSOFF to xx. 
RESPHYS: Reset PHYSOFF to original value. 
DCP: DECOMP. 
ZZ: DECOMP. 

XX yy BDUMP: Dump hex bytes in memory locations xx 
through yy. 

XX yy CDUMP: Dump ATASCII characters in memory loca- 
tions XX through yy. 



Verbs by Bob Gonsalves, Antic Magazine 

XX >< : Swap the MSB and LSB of xx. 

XX MSBYTE: Use only the MSB of xx. Mask off LSB and shift 

down. 

xx LSBYTE: Use only the LSB of xx. Mask off MSB. 

XX VAR yyyy: Defines the variable yyyy with an initial value of 

XX. Can be used in place of the xx VARIABLE yyyy verb. 

Variables defined with VAR will return the value of the 

variable, not its memory location. To put a value into a VAR 

variable, use the TO verb. 

XX TO yyyy: Assigns the value xx to the variable yyyy. This 

pertains to VAR declared variables, not VARIABLE. 

XX MSB: shortform MSBYTE. 

XX LSB: shortform LSBYTE. 



Verbs by R. Mansfield, Compute! and HES 

XX yy FIND zzzz: Search for text zzzz, from screen xx to screen 

yy. Search all screens on disk as a default. Abort by pressing 

START button. 

NS, GS, WS, BS: Change screen colors. 

xx U.: Prints the unsigned value of byte xx. Normally integers 

range from -32767 to 32767. U. displays integers as to 65535. 

VERIFY, NOVERIFY: Change disk I/O verify on write 

command. 

XX SNDOFF: Turn off voice xx (e.g. xx SOUND). 

THERE: Returns the address of the top of available user 

memory (MEMTOP). 

FREE: THERE HERE - 

BINARY: Change BASE to 2. 

HX, DX, BX: Shortforms of HEX, DECIMAL, and BINARY. 

PON: All screen I/O is echoed to the printer. 

POFF: Turns off printer echo. 

And many, many more ... © 
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Call us for discount prices, availability, or 
advice. Remember, service is our middle 
name." Joe Guzzo, President, A.S.C. Inc. 








ATARI 800 

800 16K $654.95 

800 32K $745.95 

800 48K $815.95 




ATARI 400 

400-1 6K $264.95 

400-32K $364.95 

400-48K $430.95 

410 Recorder $76.00 

810 Disk Drive $444.95 

Kits 

481 Entertainer $83.00 

482 Educator $1 29.95 

483 Programmer $56.95 

484 Communicator . . . $339.95 

Software 

We carry the full line of Atari hardware 
and software products backed by our 
Authorized Service Department. 
Please call for special prices on all 
Atari software and APX software. 



TEXAS 
INSTRUMENTS 

All models Call for prices 

MONITORS 

Amdex 1 2-in. B&W , , . $129.00 
Amdex12-in. Green ..$139.00 
Amdex 13-in. Color . . . $349.00 

BMC--BM12A $114.95 

NEC 1 2-in. B&W $169.95 

NEC 1 2-in. Color $339.00 

TI10 $344.95 

Corvus Call for prices 

Zenith Z1 9 1 2-in $115.00 



DISKS 

Elephant 10/$21.95 

Elephant DD 10/$24.95 

Dysan5%-10/16 10/$38 

Verbatim 8-in.SD-SS . . . 10/$32 

Verbatim 100/$245 

Scotch 3M 10/$25.95 



DISK DRIVES 

Corvus Call 

Percom Call 

Paradynamics Call 



VIC-20 

VIC-20 Personal Computer $175 

GAMES/ 
PROGRAMS 

Unlimited Availability Call 

COMPUTER 
DESKS 

Send for catalog and photos. 





Limited space prevents a full listing of 
the lines we carry. If you don't see it 
listed, we can get it for you, for less. 

TO ORDERl Phone orders accepted via Mastercard, Visa, or 
bank wire transfer. Visa and MC service charge of 2%. Mail orders may send 
charge card number (include expiration date), cashiers check, money order, 
or personal check (allow 1 business days for personal or company checks 
to clear). Please add 3% ($5.00 minimum) for UPS shipping, handling, and 
insurance. APO and FPO include 5% ($7.00 minimum) for postage. Califor- 
nia residents add 6% sales tax. Please include phone number on all orders. 
FOREIGN ORDERS include 1 % handling. Credit cards not accepted on 
foreign orders. All equipment is in factory cartons with manufacturer warran- 
ty. Opened products not returnable. Restocking fee for returned merchan- 
dise. Equipment subject to price change and availability. Retail prices differ 
from mail order prices. WE SHIP THE SAME DAY ON MOST ORDERS. 



DC-2 ROBOT 

Operates on any home computer. 

Stands 4 feet high. 

Call for details and prices. 



TERMINALS 

Televideo $569.00 

910 $569.00 

91 2C $694.95 

920C $744.95 

950 $934.95 

Call for Computers 

MODEMS 

Lexicon $149.00 

U.D.S. 1030ALP ... $169.00 
RacalVadicVA3212. . $749.00 
Prentice Star $179.95 



PRINTERS 

Brother HR-1 Parallel . . $829.95 
Brother HR-1 Serial . . $880.00 
Smith-Corona TP-1 Parallel $665 
Smith-Corona TP-1 Serial . $665 

C. Itoh Starwriter $1 ,350 

Diablo 630 $1,999.95 

Epson printers Call 

Centronics printers Call 

All name brands Call 

NEW* NEW 

Coleco-vision, Mattel Intellivision, 
and Atari VCS game machines and 
game cartridges. Call us for infor- 
mation on the latest, improved 
models and best prices. 



Call Collect (714)284-5615 7 Days/Week 

Monday through Saturday 8am-8pm 

Sundays and Holidays 1 2n-6pm 

After 11/6/82 , Call (619) 284-5615 

A.S.C. Inc., 7436 University Ave. 
La Mesa, CA 92041 
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From Valpar Corporation, 3801 
East 34 St., Suite 105, Tucson, AZ 
85713. System requirements: 
Atari® 400/800 witli 24K and disk 
drive. Use of one or more of tlie 
various extension pacliages 
available requires a 32K system. The 
suggested retail price for the basic 
package {valFORTH kernel and fig 
Editor) is $45.00. 

Trying to describe any computer 
language is difficult, but with 
FORTH it is especially frustrating, 
because it defies attempts to place it 
within familiar categories. Because 
so few people are acquainted with 
FORTH, however, it seems ap- 
propriate to make a few general 
observations on the nature of the 
language before reviewing this 
specific implementation. It is dif- 
ficult to say if FORTH is an inter- 
pretive or compiled language, as it 
has elements of both. Like a com- 



"kernel," or core FORTH. These 
commands include simple looping 
structures, conditional structures, 
mathematical and logical opera- 
tions, memory and stack opera- 
tions, and input/output functions. 
The way you build an application 
out of these commands is to use 
groups of simpler commands to 
define new, more complex com- 
mands. These new commands then 
become part of the language, and 
can be used in exactly the same way 
that you use the core commands. By 
building more and more sophisti- 
cated words, you finally get one 
word that actually is your complete 
application. 

An example related to BASIC 
programming may clarify this 
somewhat. In a BASIC program, if 
you wish the program to pause and 
do nothing for a while, you might 
put in an empty loop to delay the 



"Trying to describe any computer language is difficult, 
but with FORTH it is especially frustrating, because it 
defies attempts to place it within familiar categories." 



piled language, source code is 
entered through a terminal or from 
a disk file, and is then converted in- 
to a form which can be used inter- 
nally without having to be re-inter- 
preted. But like interpreted 
languages, it is interactive. You can 
sit down and create a new module, 
test it in a controlled setting, change 
it and test it again, without having 
to change all of your source code. 

If this sounds somewhat mysteri- 
ous, it is because of the unique way 
in which the language operates. 
Each FORTH command is called a 
"word." The typical implementa- 
tion of FORTH contains a more or 
less standard group of these words, 
which is referred to as the 



program. The statements FOR I = 1 
TO 10000:NEXT I would cause 
such a delay, and allow the user time 
to read some text, for example. 
Every time you wished the delay to 
occur, you would have to insert this 
same statement into the program. In 
FORTH, the equivalent function 
could be assigned to a newly-defined 
word called DELAY. The code to 
accompUsh this might look like 

: DELAY 10000 1 DO LOOP ; 

This could be read as "Start defini- 
tion of the word DELAY. Set an ini- 
tial index to 1, and loop, increasing 
this index by 1 until it reaches the 



maximum value of 10000. End of 
definition." The word DELAY is 
defined in terms of the core words 
DO and LOOP. Once defined, it 
becomes a valid FORTH command. 
This means that you could use 
DELAY in defining other FORTH 
words, and when these words were 
executed, they would include the 
built-in delay. If you wanted to test 
the BASIC statements to see how 
long a delay they caused, you could 
execute them by typing both 
statements in and hitting RETURN. 
Likewise, if you wanted 
to test the new word DELAY, you 
could execute it in the immediate 
mode by typing in DELAY on the 
keyboard, and hitting RETURN. 
One interesting difference you 
would discover if you tried testing 
these two programs is that the 
BASIC delay loop takes about 23 
seconds to execute, while the 
FORTH loop is finished in a little 
over a second! 

One of the main advantages of 
FORTH is speed of execution. 
Depending on the situation, it can 
range from five times to 100 times 
faster than BASIC. Where extra 
speed is needed, FORTH words can 
also be defined directly in Machine 
Language using a FORTH assem- 
bler. This type of speed is especially 
useful for graphics animation, and 
fast-action games, which are almost 
impossible to program effectively in 
BASIC. There are other advantages 
as well. A well-coded FORTH pro- 
gram is very compact, and requires 
little memory. The modular struc- 
ture of FORTH programs encour- 
ages good programming habits. It 
allows the programmer to isolate 
each small element of the overall 
problem, and deal with those 
elements one at a time. As men- 
tioned above, the interactive nature 
of the language allows easy test- 
ing of each module. An added 
bonus is the portability of these 
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modules. Once you have defined a 
word which performs a specific 
task, you can use that same word in 
future programs. If you improve the 
word later, earlier programs can be 
improved just by substituting the 
improved definition of the word. 
Creating a specialized vocabulary 
for commonly performed tasks can 
really speed program development 
time. 

Of course, along with these ad- 
vantages go some drawbacks. 
Although FORTH programs exe- 
cute faster, it may take you longer 
to code them. There are many 
reasons for this. First of all, 
FORTH is a stack-oriented 
language. This means that the 
arguments used by FORTH oper- 
ators (like the variables and con- 
stants you manipulate in BASIC) 
are usually kept on a pop-up stack 
while you are working with them. 
The last number that is pushed 
down onto the stack is the first one 
that gets pushed off. Therefore, it is 
important to keep track of just what 
is on the stack at all times. BASIC 
programmers aren't used to attend- 
ing to this kind of detail. Because of 
this stack orientation, FORTH uses 
Reverse Polish Notation (RPN). In 
FORTH, if you want to add 3 and 5, 
the correct syntax would be 3 5 -I- , 
with the addition operator coming 
after the arguments. This notation is 
generally conceded to be clearer 
than the more commonly used infix 
notation, where the operator comes 
between the arguments. For exam- 
ple, using infix notation, you need 
parentheses to tell whether 3 + 5/4 
means (3 + 5)/4 or 3 + (5/4). The 
RPN statement 3 5 4/ + does not 
suffer from this ambiguity. Unfor- 
tunately, beginners may find this 
unambiguous statement difficult to 
comprehend. The problems that 
some beginners may have with 
postfix notation and the heavy stack 
orientation could be magnified by 



the modular nature of the language; 
if you build a high-level word from 
lower-level words, you must keep 
track of what arguments each com- 
ponent word requires, and what 
happens to the stack as a result of 
each word. In other words, while 
FORTH is the kind of language you 



thorough documentation. The 
documentation deals mostly with 
the particulars of this implementa- 
tion though; for a generalized in- 
troduction to FORTH, it refers the 
user to the book Starting FORTH, 
by Leo Brodie. (See review on page 
19.) Mr. Brodie's work is a clear and 



"...every new command becomes part of the language, 
the sheer number of them might be overwhelming. Atari 
BASIC has only about 80 keywords, but the FORTH 
kernel could have several times that many." 



can make up as you go along, you 
have got to remember your own 
rules! This may not sound too dif- 
ficult, but it requires planning 
ahead. While you can achieve 
results with sloppy BASIC program- 
ming, in FORTH it will only get you 
into trouble. 

Another problem that a beginner 
might have with FORTH stems 
from its extensible nature. Because 
every new command becomes part 
of the language, the sheer number 
of them might be overwhelming. 
Atari BASIC has only about 80 
keywords, but the FORTH kernel 
could have several times that many. 
When you get into graphics exten- 
sions, editor and assembler, disk 
utilities and the like, you are faced 
with literally hundreds of com- 
mands. This makes the language 
more powerful, but somewhat 
harder to control. To the dedicated 
FORTH enthusiast, however, these 
problems are minor in relation to 
the limitless horizons it presents to 
the programmer who is willing to 
work with it. 

valFORTH is based on the stan- 
dard model of the FORTH Interest 
Group (fig), with most of the core 
words coded in Machine Language 
for extra speed. It is a straightfor- 
ward implementation, with very 



amusing treatment of what could 
otherwise be a confusing subject. 
While not a step-by-step introduc- 
tion to FORTH, the documentation 
is carefully laid out with an eye to 
clarity, and to accommodating the 
FORTH novice. 

Besides the fig-FORTH kernel, a 
number of very useful extension 
packages are available. There are 
two editors with which the user can 
create source code "screens," as 
they are called. One is the fig- 
FORTH editor, (included in the 
basic package) which is command 
oriented. The other is a special 
valFORTH editor which is more 
oriented to the Atari operating 
system's method of editing lines of 
text. The novice, used to the latter, 
will find the valFORTH editor 
much easier to use. The assembler 
included with the package allows the 
user to add Machine Language 
subroutines, or define FORTH 
words in terms of Machine 
Language instructions. This 
assembler is a superset of two 
popular assemblers, the Ragsdale 
assembler, and the APX version, 
and is compatible with both. Exten- 
sions are also included which sup- 
port the full range of Atari graphics 
and sound, as well as I/O opera- 
continued on page 61 
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A feast 
of computing ideas. 



If you work with a 6502/6809-based 
system, you're probably hungry for the 
facts and ideas that will help you 
understand the inner workings of your 
computer. You want to go beyond 
canned software — use your computer 
for more than games — learn the 
advanced programming techniques 
that enable you to get the most out of 
your 6502/6809 system. 

MICRO, The 6502/6809 Journal, 
gives you page after page, month after 
month, of solid information to sink 
your teeth into. MICRO is the premier 
how-to magazine for serious users of 
the Apple, PET/CBM, OSI, Atari, AIM, 
SYM, KIM, and all 6809 based systems 
including the TRS-80 Color Computer. 
It's a resource journal internationally 
respected by professionals in business, 
industry, and education. Every issue of 
MICRO keeps you informed with up-to- 
the-minute data on new products 
and publications: 

• hardware catalog with organized, 
concise description 

• software catalog in an easy-to- 
use format 

• new publications listed and 
annotated 

• reviews and evaluations of sig- 
nificant products 

And there's much more; 

• In-depth hardware tutorials 
bring expert advice into your home or 
office. 

• Detailed discussions of pro- 
gramming languages deepen and 
broaden your programming ability. 

• Complete program listings 
enable you to increase your machine's 
capabilities. 

• Bibliography of 6502/6809 
Information helps you to find pertinent 
articles in a timely manner. 

• Special monthly features with 
in-depth treatment of one subject or 
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A Look BtthaJ^RS-W Color CompuMr 
A to D Convwtm for Your Computsr 



You'll love 
every byte. 



YES! I want to get more from 
my microcomputer. Please send me 

. . year(s) of MICRO at $ /year. 

(Outside U.S. and Canada, please 
indicate via D surface or D air mail.) 



Company 



City State Zip Code 

D Check enclosed for $ 

D Charge my credit card account 
n VISA D MasterCard 

Signature 



system increase your knowledge of the 
field. 

• Balanced mix of machine- 
specific and general articles for your 
everyday use as well as long-range 
reference needs. 

• Informative advertising 
focused specifically on 6502/6809 
machines keeps you abreast of latest 
developments. 

• Reader feedback puts you in 
touch with other micro-computerists. 

MICRO is the magazine you need to 
get the most from your own 6502/6809 
system! 

To order, send your check or interna- 
tional money order (payable to MICRO) 
and the order form at left, to: 

Subscription Fulfillment 

MICRO, Dept. Ml 

34 Chelmsford Street 

P.O. Box 6502 

Chelmsford, MA 01 824 

Or, for your convenience, call our 
toll-free number: 

1-800-345-8112 

(In California, 800-772-3545, Ext. 564) 
and charge your subscription to your 
MasterCard or VISA. (All orders must be 
prepaid in U.S. dollars or charged to 
your MasterCard or VISA.) 

SUBSCRIPTION RATES (US. dollars) 
Yearly subscription (ISSN 027-9002) 
saves 20% off the single-issue price. 
U.S. $24* 
Canada $27 

Europe $27 ($42 by air mail) 
Mexico, Central America, Mideast, 
North and Central Africa $27 ($48 air) 
South America, Far East, South Africa, 
Australasia $27 ($72 air) 
♦SPECIAL OFFER— U.S. ONLY: 
Save even more— 30% off single-issue 
price: 2 years, $42 

Dept. S S 



Expiration date 
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continued from page 65 

tions. These are very similar to the 
Atari BASIC commands. Some disk 
utilities are provided for copying 
source code, formatting disks, and 
backing up programs. (The FORTH 
language is very disk-bound, and is 
available only on disk.) Some pro- 
gram debugging aids are included. 
This package even has floating point 
words implemented. (FORTH is 
usually restricted to two-byte integer 
math.) A very nice feature of this 
package is the inclusion of words 
for creating an auto-booting ap- 
plication package out of FORTH 
programs you have written. Valpar 
International gives permission to 
users to distribute programs created 
with this system, as long as credit is 
given. Programs so created do not 
require that the user have the 
valFORTH system, and can be run 
on any system. It is even possible to 
create bootable cassettes! 

If this sounds like a lot for the 
money, it is. This comprehensive 
FORTH system presents enough 
material for learning and program- 
ming to occupy anyone for quite a 



while. Once you are ready to go fur- 
ther with FORTH, Valpar Interna- 
tional offers a great number of ex- 
tension packages, covering a very 
broad spectrum of programmers' 
needs. These include an advanced 
editor, with several utilities (in- 
cluding one for handling string 
data, a rarity for FORTH systems), 
a Player-Missile graphics package, a 
"turtle" graphics extension, a 
display formatter, and a text- 
compression utility. All of these 
packages come with extremely 
thorough documentation, including 
a cardboard quick-reference guide, 
a tutorial on the use of the exten- 
sions, sample programs, and com- 
plete, heavily commented source- 
code listings. Future packages will 
include a DOS interface that will let 
you use disk files in Atari DOS for- 
mat, (which FORTH normally does 
not use) and a target compiler. This 
latter package, which will be in the 
$300 price range, will allow you to 
produce very compact object code 
for commercial-quality software. 

This is not to suggest that it is 
necessary to buy all of these 



packages. Though the Player- 
Missile graphics and Editor 
packages are ones which I could 
recommend to everybody, some of 
the others are quite specialized, and 
would be useful for only certain ap- 
plications. Moreover, FORTH is the 
type of language which most users 
Uke to "customize," suiting the 
means of performing specific tasks 
to their own personal preferences, 
which may or may not coincide with 
the way in which valFORTH 
handles them. The important point 
here is that Valpar International has 
shown a great amount of dedication 
to supporting a wide variety of ap- 
plications, and to producing a pro- 
duct line which expands and im- 
proves in response to the needs of its 
customers. Although FORTH is not 
the easiest language to learn, they 
have worked very hard at making it 
as accessible as possible. They have 
succeeded to the degree that 
anybody who feels confident pro- 
gramming in BASIC and wants to 
develop higher-performance type 
programs should certainly in- 
vestigate this alternative. © 
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"♦"""NECESSITIES**""*" _ 
DISK COMMANDER II - Just save this program on your BASIC disks and it will 
autoboot and automatically list all programs from the disk into your screen. Simply 
run any BASIC or Machine Language program by typing a single number. 

Requires 16K, Disk Only 29.95 

BASIC COMMANDER - An all machine language program which occupies only 4K 
of RAM and is co-resident with your BASIC program. It is an indispensable tool for 
every ATARI BASIC programmer. Basic Commander allows single key access to 
DOS functions, BASIC file manipulation commands such as LOAD, LIST, ENTER, 
RUN, SAVE and more! Never need to access DOS again. RENUMBER allows you 
to renumber all Basic lines and all references instanta'niously! In addition, 
BLOCKDELETE allows deletion of any range of lines, eliminating computer lock- 
up. AUTONUMBER automatically provides line numbers for your BASIC program, 
increasing program entry speed from 25 to 75".>. If we've omitted your favorite 
commands, Basic Commander even provides 3 PROGRAMMABLE KEYS! 
THE MOST POWERFUL PROGRAMMING AID AVAILABLE 
FOR THE ATARI BASIC PROGRAMMER 

Requires 16K, Disk Only $34.95 

RAM TEST II - The fastest and most thorough memory test available for the ATARI 
has now been further improved! Tests not only all locations, but also tests the 
memory addressing system. This all machine language program takes 4 min. to test 
48K. It's the only program that tests-the cartridge area of RAM. Good for new 400/800 
computer owners, for testing new RAM boards and for use in computer stores to test 
for any bad memory locations. Bad memory locations are pinpointed so repair is as 
simple as replacing a chip! 

Requires 8K, Disk or Cassette $29.95 

******** BUSINESS/HOME********* 
MAIL LIST - Extremely fast BASIC and machine language program. Each data disk 
holds over 500 files. Sort on any of 6 fields at machine language speed or search on any 
fragment of a field! Use any size lables or envelopes. 

Requires 40K, Disk Only . . . ." $39.95 

•*•***•*♦«* TUTORIALS*********** 

ASTEROID MINERS - This 50 page book and program provide for a unique 
intermediate-to-advanced tutorial. A 32K BASIC game utilizing over 25 players in 
player-missile graphics, machine language subroutines, a redefined character set, 
multiprocessing utilizing the vertical blank interrupt interval, and much more! The 50 
page book included with the program documents each part of the entire program and 
contains the fully documented source code for both the BASIC and assembly 
language parts of the program. Use these routines in your own programs. These 
examples make it easy! 

Requires 32K, Disk or Cassette $34.95 

ATARI is a registered trademark of ATARI, INC. N.J. Residents add 5% sales tax. 
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ALL MACHINE LANGUAGE ARCADE GAME 
WITH INTELLIGENT MONSTERS! 



This arcade style game is sure to become an ATARI classic. 

Chomper requires 16K RAM, 1 joystick and nerves of steel. 

Available on Disk or Cassette $29.''" 



Available at your favorite computer store or 
Send a check or money order directly to: 

MMG MICRO SOFTWARE 

P.O. BOX 131 • MARLBORO, NJ 07746 

or call (201)431-3472 

for MasterCard, Visa or COD deliveries 
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Reviewed by Jeannine Gif f ee 



from APX (Atari Program Ex- 
change), 155 Moffett Park Drive, 
B-1, P.O. Box 427, Sunnyvale, CA 
94086. System requirements: Atari 
400/800 with 48K and two disk 
drives. Suggested retail price: 
$49.95. 

Pascal is a high level language 
developed by Professor Niklaus 
Wirth and Kathleen Jensen in the 
early 1970's with a very specific goal 
in mind. They beUeved that, with 
the explosion of computers into 
society, people needed a powerful 
programming language designed 
with the rank amateur in mind — an 
introductory language. From this 
intention developed the very power- 
ful and highly structured language, 
Pascal, — powerful, because with a 
minimum vocabulary of 35 reserved 
words, you can develop highly 
sophisticated levels of organization; 
structured because the language re- 
quires a particular format and a top 
down design flow. For example, 
your program must declare and 
define a particular Function or Pro- 
cedure prior to Implementing it. 
Pascal forces the programmer to 
operate in a systematic and organ- 
ized fashion. The benefits of such a 
language are that it makes program- 
ming relatively easy to code and 
debug, and it is most certainly more 
readable than a number of other 
languages. The difficulties in learn- 
ing Pascal are in knowing the pro- 
tocols for developing a program 
structure that the compiler will 
understand and knowing Pascal's 
syntax rules (Pascal will not tolerate 
any syntax errors). 



Atari Pascal 



To evaluate this system, it is best 
to treat it in two ways: 1) as an im- 
plementation of Pascal, and 2) com- 
paring it to other programming 
languages available on the Atari. 
With this approach, you can realize 
the benefits of the system, and also 
see its disadvantages, in proper 
perspective. Although I find a 
number of annoyances in using 



Atari Pascal, they are primarily 
because of the nature of the 
language. In fact, this is a very good 
implementation of Pascal. If you've 
already made the hardware invest- 
ment and can meet the system re- 
quirements, $49.95 is an excellent 
price for a programming language. 
The Atari Pascal Language 
System is based on Jensen and 
Wirth's definition of the language 
and adheres to ISO standards (Inter- 
national Standards Organization). 
Although it is not UCSD based, it is 
a superset of the Pascal described by 
Jensen and Wirth. An important 
thing to realize is that Pascal is 
very standardized. The Atari Pascal 
Language System simply takes best 
advantage of the features and struc- 
ture of your Atari computer. Many 
features are offered that support 
"micro" technology, i.e. being able 
to do bit and byte manipulations, 
and Atari Pascal supports the highly 
desirable Atari sound and graphics 
capabilities. 

System Requirements 

The APX package includes a 
reference manual and two diskettes 
which contain the Pascal Monitor, 
Compiler, Linker, Interpreter, and 
run-time subroutine Library. This 
system should not be considered a 
tutorial, since it assumes some 
familiarity with Pascal. The 
reference manual defines the 
language features specific to Atari 
Pascal and helps you understand 
how to implement them. It also pro- 
vides instructions on how to use the 
compiler and linker options and 
provides some insight into their 
operation. If you are not familiar 
with Pascal, you will definitely need 
a programming manual. I can 
highly recommend George Cherry's 
Pascal Programming Structures and 
the Pascal User Manual and Report 
by Jensen and Wirth. Cherry's book 
assumes that you are starting from 
scratch, but advances quickly. It 
reveals, through great explanations 
and specific examples, the complete 
Pascal language. Jensen and 



Wirth's book, while a bit more cut 
and dried, provides an understand- 
ing of the implementation of the 
language as well as offering a func- 
tional description. 



Operation 

The three programs that come in 
this package are used to develop a 
Pascal program. An editor is also 
required, but is not part of the 
package. There are basically four 
stages in program development. 
First, you create a source file. 
Second, you compile your source 
file. Pascal source code is not com- 
piled to machine code, but rather to 
an intermediate language called 
P-Code (a familiar term for 
FORTH programmers). P-Code is 
relocatable code, meaning that once 
you have compiled your source 
module, it is ready to be linked with 
other necessary modules, like 
subroutines in the Pascal library. 
Third, you link together compiled 
modules and store your executable 
file on disk. Hopefully, in the 
fourth and final stage, you run your 
program. Since your object file 
resides as P-Code, it requires the 
Pascal Interpreter at run time in 
order to be executed. 

Each program is called from the 
Pascal Monitor, a menu which will 
load the desired program. The 
system also supports at least two 
disk drives. Drive one is designated 
for system software, and drives two 
through four can be used for your 
program work space. 

This particular configuration 
leads to a couple of restrictions. 
First of all, you are disk bound, 
which leads to slow development 
time. Each program must be loaded 
every time you wish to use it. 
Debugging a program, therefore, 
can take a long time. Each time you 
make a change you have to load the 
editor, exit, load the compiler, com- 
pile and, if successful, link and run 
the program. Also, control for each 
phase must pass through the Pascal 
Monitor. Since the Pascal Compiler 
occupies a major portion of RAM, 
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you cannot create large modules 
which might exceed available 
memory. You can easily compensate 
for this restriction, however, by 
writing small modules and linking 
them together. It also makes debug- 
ging source files faster. With the 
ability to declare External functions 
and procedures, you can maintain 
complete communication between 
modules. The bottom line is that 
RAM restrictions are easily man- 
aged, but without significant hard- 
ware investment, development time 
cannot be greatly enhanced. I think 
it is fair to state that such restric- 
tions are not due to a poor im- 
plementation, however, but rather 
to the nature of the language. 



Features 



With these restrictions in mind, 
the developers of Atari Pascal pro- 



vided some nice features to help you 
cope. The compiler tells you how 
long your compiled module is, giv- 
ing you a sense of your RAM limita- 
tions. It also gives you the option of 
creating compiled files on the same 
drive as source files or on another 
drive. There are also a number of 
compiler and linker options which 
detect error types, thereby aiding 
you in debugging. 

The documentation offers 
descriptions of a number of very 
powerful procedures and para- 
meters in the categories of bit, byte, 
word, and string operations, direct 
disk access, access to the operating 
systems I/O control blocks (i.e. 
Open and Close procedures), and 
more. 

A major advantage of using a 
language like Pascal is realized at 
run time. It is significantly faster 
than BASIC. My crude comparisons 



showed about a 300% increase in 
speed of execution. The end result is 
a fast program without the necess- 
ity of getting your hands dirty with 
assembler. 



Summary 

Atari Pascal is a powerful tool for 
only $49.95, but it requires a full 
blown ATARI computer system. 
Development time is slow, yet the 
instruction set is extremely powerful 
— a superset of the ISO's. As an in- 
terpreted language, programs are 
not universally portable, yet execu- 
tion is speedy. There are many more 
pluses and minuses to this package. 
As a firm beUever in the old adage, 
seeing is believing, however, I have 
provided two listings of a player 
missile program entitled "JAWS," 
one in BASIC and one in Pascal. 
See for yourself! 



ss ss ss ss ss ss ss ss ss ss ss 

uj 35 

SS ftTARI BASIC SS 

SS 'JAWS' SS 

SS AUTHOR: JEANNINE 6IFFEE SS 

SS SS SS SS SS SS ss SS SS SS ss 

10 6RAPH1CS 2! 

15 REH 

16 REH IIITHE BACKSROUNDH} 

17 REM 

20 POKE 708,45:P0KE 7!2J48:COL0R 1:PL 
OT 1,!2:DRA«T0 12,0:DRAaT0 0,0:POSITIO 
N 0,12:P0KE 765,1 
30 no 18,16,0,0, "S:" 
40 PLOT 79,12:DRAMT0 7?,0:DRAWT0 67,0: 
POSITION 78, 12: no 18,#6,0,0,"S;'' 
50 COLOR 1:PL0T 12,47:[iRAWT0 0,.35:P0S1 
TION 0,47:POKE 765,1:00 18,#6,0,0,"S: 

60 PLOT 79,47:CRAWT0 79,35:P0SITI0N 67 

,47: POKE 765,1:110 18,#6,0,0,"S:" 

70 COLOR hPLOT 32,ie:DRAlilT0 28,15:DRA 

SiTO 23,15:P0SITI0N 18,18 

80 POKE 765,l:n0 18,16,0, 0,"S:" 

85 REH 

86 REH IJITHE TREEUJ 

87 REtl 

90 POKE 709,240:C0L0R 2:PL0T 27,15:DRA 
WTO 27.7:PL0T 28,15:DRfl«T0 28,7;P0KE 7 
10,198 

91 PLOT 28,15:DRAWT0 28, 7: POKE 710,198 
95 COLOR 3: PLOT 27,6:[)RAHT0 23,3 



100 

101 
105 
106 
107 
510 
520 



COLOR 3:PL0T 27,6:DRA«T0 33,3:PL0T 
,6:DRA«T0 42,3:PL0T 27,6:DRA«T0 16, 
.OT 27,6:!}RAWT0 16,9 
PLOT 27,6:DRAMT0 42,9 
REM 

REH IIINITIALIZE P/M« 
REM 

Pt1BASE=54279:eRflCTL=53277 
SI!t1CTL=559:RAMT0P=106 
HP0S0=53248:HP0S2=53250:HP0S3=5325 



540 PC0LR0=704:PC0Lfi2=706:PC0LR3=707 
560 REH 

570 X=100:Y=60:Z=150 
580 A=PEEK(RAHT0P)-24:P0KE PHBASE,fi 
600 HYPMBASE=256tfi 
620 POKE BfiACTL,3:P0KE SD!1CTL,46 
630 POKE HP0SD,300:P0KE HPOS2,350:POKE 
HP0S3,!58 
640 POKE PC0LR0,8:P0KE PC0LR2,88:P0KE 
PC0LR3,S8 
650 REH 

660 REM tICLEAR PM AREAII 
670 REH 

680 FOR I=H¥PMBASEt512 TO HYPHBASE+102 
4:P0KE I,0:NEXT I 
690 REH Create Player 
700 REH 

710 FOR I=HYPHBASE+512+y TO HVPHBASE+5 
21+Y:READ ft:POKE I,fi:NEn I 

711 DATA 224,112,56,60,62,62,63,63,127 
,255 

714 FOR l=HYPI1BASE+768+Y TO NYPHBASE+7 
77+Y:READ A:POKE I,A:NEn I 



715 DATA 0,0,64,67,102,125,123,61,30,1 
5 

716 FOR I^HYPMBASE+896+57 TO HYPHBASE+ 
908+57:READ A:PQKE 1,A:NEVT I 

717 DATA 240,255,255,112,64,224,240,56 
,248,252, 138, 124', 248 

718 REM 

719 REM JIHOVE SHARKS 

720 REH 

723 IF 1=1 THEN 60T0 2000 

725 FOR ^=100 TO 150:P0KE HPOSO,I:FOR 

J=I TO 5:NEn J:NEn X 

730 IF M THEN 60T0 2000 

2000 REH 

2010 REH HEAT DUCKII 

2020 REH 

2090 FOR H=l TO 14:P0KE HYPHBASE+777+Y 

,0:POKE HYPHBASEm5+Y,0 

209! FOR 1=10 TO -3 STEP -1:P0KE HYPHB 

ASE+768+Y+I , PEEK (HYPHBASE+767+Y+I ) 

2092 POKE HYPHBASE+896+V+I,PEEK(HYPHBfl 
SEr395+Y+I) 

2093 NEU I 

3000 FOR 1=1 TO 30:S0UND 0, 100,4, 10:NE 

n I: SOUND 0,0,0,0 

3010 NEH H 

3020 POKE PCOLR0,88 

3025 FOR 1=1 TO 200:NEn I 

3030 FOR 1=1 TO 20:S0UND 0,45,12,10:NE 

n 1:F0R 0=45 TO 40 STEP -2:S0UND 0,1, 

12,10:FOR K=l TO 10 

3040 NEH K:NEn J:SOUND 0,0,0,0 

3050 POKE HPOSO,0 

3060 BOTO 3060 continued on page 70 
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Atari Pascal continued 


{mummttmmm) 

mtmm prograhiiuij 




SS SS SS SS SS SS SS SS SS SS SS 


mmmmmmum) 


SS SS 


BEGIN 


S3 ATARI PASCAL SS 


INITGRAPHICS!5); 


SS 'JABS' SS 


BRAPHICS(5,FULLJCREEN,CLEAR_SCREEN); 


SS AUTHOR: JEANNINE 6IFFEE SS 




SS SS 


(JCREATE BACKGROUND!) 


SS SS SS SS SS SS SS SS SS SS SS 






P0KE(755,1); P0KE(708,45); P0KEi712,148); COLOR(l); 




PL0T(1,12); DRA«T0!12,0); DRAMTO(0,0); P0SITI0N(0,12); 




P0KE(7i5,l); FILLS0,12); 




PL0T(79,12); DRANT0(79,0); DRAMT0(67,0); P0SITI0N(7S,I2); 


PR06RAH JAHS( INPUT, OUTPUT); 
TYPE 


FILL(7B,12); PL0Tn2,47); DRAWT0!0,35); P0SITI0N(0,47); 


P0KE(765,1); FILL{0,47); PL0T(79,47); DRAMT0(79,35); 


SCRNJYPE=(FULL_SCREEN,SFLiT.SCREEN); 
CLEAijYPE=!CLEAR.SCREEN,DO_NOT.CLEAR_SCREEN)i 
VAR 
A,I,J,K,L,N,!(,Z,P«BASE!lNTEBER; 


P0SITI0N(67,47); P0KE(765,1); FILL(67,47); PL0T(32,18); 
DRA«T0(28,15); DRAWTQ (23,15); P0SITI0N(18,18); P0KEI765,1); 


FILL!18,18); 


(tPROCEDUREStJ 


(tCREATE TREED 


EXTERNAL PROCEDURE INITGRAPHICS!I1AX.N0DE:INTE6ER); 


P0KE{709,240); C0L0R(2); PL0T(27,15); DRAHT0(27,7); 


EXTERNAL PROCEDURE SRAPHICS(HODE: INTEGER; SCREEN:SCRN TYPE; 


PL0T!28,15); DRAWT0I28,7); P0KE!710,198); PL0T(28,15); 


CLEAR: CLEAR.TYPE); 


DRAWT0!28,7); P0KE(710,198); C0L0R(3); PL0T(27,6); 


EXTERNAL PROCEDURE S0UND(V0ICE,PITCH,DIST0RTI0N,V0LUI1E:INTE6ER); 


DRAaT0(23,3)'; PL0T!27,6); DRAt(T0(33,3); PL0T(27,6); 


EXTERNAL PROCEDURE COLOR i COLOR. VALUE: I NTE6ER); 


DRA«T0(42,3); PL0T(27,6); DRAWT0(I6,3); PLQT(27,6); 


EXTERNAL PROCEDURE FILL(X,Y:INfE6ER)i 


DRAWT0{16,9i; PL0T(27,6); DRA«T0i42,9); 


EXTERNAL PROCEDURE PLOT(X,V: INTEGER); 




EXTERNAL PROCEDURE P03ITI0N!X,Y: INTEGER); 


(UNITIALIZE P/HI) 


EXTERNAL PROCEDURE DRAWT0(X,Y: INTEGER); 




EXTERNAL PROCEDURE POKE !ADDR,VAL: INTEGER); 




EXTERNAL FUNCTION PEEK(ADDR: INTEGER): INTEGER; 


P0KE(559,46); P0KE(53277,3); 




A:=PEEK(106)-24; P0KE(54279,A); 


PROCEDURE Pi; 


PHBASE:=256tA; 


BEGIN 


POKE (53248, 100); POKE (53250, 150); POKE (53251, 158); 


INLINE(224/1 12/56/60/62/62/63/63/127/255); 
END; 
PROCEDURE P2; 


P0KEi704,8); P0KE(706,8B); P0KE(707,88); 


(tSETTING UP PLAVERSt) 


BEGIN 




INLINE!0/0/0/0/0/64/67/102/125/123/61/30/15); 


FOR I:=P«BASE+512 TO PflBASE+1024 DO POKE (1,0); 


END; 


FOR I:=l TO 10 DO 


PROCEDURE P3; 


PQKE(PI1BASE+512+60+I,PEEK(ADDR!Pl) + (I+4))); 


BEGIN 


FOR I:=l TO 13 DO 


INLINE(240/255/255/112/96/224/240/56/248/252/18e/124/248)| 


BEGIN 


END; 


POKE (PMBASE+768+57+I , PEEK (ADDR (P2) + ( 1+4) ) ) ; 




P0KE(PHBASE+896+57+I,PEEK(ADDR(P3)+(I+4))); 


PROCEDURE NOVERIGHT; 


END; 


VAR X,N: INTEGER; 


HOVERIGHT; 


BEGIN 




FOR X:=100 TO 150 DO 




BEGIN 


(tltEAT DUCKIIt) 


FOR N:=l TO 80 DO N:=N; (tDELAYt) 




P0KE(53248,X); 


FOR K:=l TO 14 DO 


END; 


BEGIN 


END; 


P0KE(PHBASE+780+57,0); ' 
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P0KE«PHBASE+908+57,0); 


MODULE PEEKPOKE; 




N:=13; 


11 This fflodule perforas the BASIC like functions, PEEK 


& 


FOR J:=14-K DOHNTO 1 DO 


POKEt) 




BE6IN 






P0KE(PHBASE+768+57+N,Ff£KiADDR!P2)+(J+2)!); 
P0KE(PHBASE+896+57+N,PEEK(ADDRIP3)+IJ+2))); 


PROCEDURE POKE!ADDR,VAL: 1NTE6ER) ; 




N:=N-I; (IDECREMENT BYTE TO FILLI) 






END; 


VAR 




FOR L:=l TO 150 DO SOUNDfO, 100,4, 10); 


PTR:'-CHAR; 




SOUNDIO, 0,0,0); 


BE6IN 




END; 


PTR:=ADDR; iJSet PTR to point at the desired addressi) 




P0KE(704,88); 


PTR-"-!=CHR!VALJ; (JPoke new address 1) 




FOR I:=l TO 50 DO I:=I; IIDELAYI) 






FOR I:=l TO 70 DO 






S0UNDI0,45, 12,10); 


END; 




FOR J: =43 DOHNTO 40 DO 






BEGIN 
S0UND(0,J,12,10); 


FUNCTION PEEKIADDRdNTESER):INTEBER; 
VAR 

PTR: "CHAR; 
BEGIN 




FOR N:=l TO 20 DO N:=N; ilDELAYJ); END; 




SOUND(0,0,0,0); 




POKE (53248,0); 


PTR:=ADDR: 




WHILE 4>2 DO 


PEEK:=ORD(PTR'^); 




BEGIN 






END; 






END. 


HODEND. © 






Apprentice" 



by Myotis Systems 



Its design 



The Apprentice™ is a 4-axis robot arm available in KIT form, 
allows expansion to 5 axes or more. 

Assembly time is typically 3-5 hours, requiring only simple tools and a sol- 
dering iron. IC sockets are provided. The robot is operated solely from 
the joyports of the Atari 400/800. 

The Apprentice™ may be controlled directly from the keyboard or from 
software. A boot-and-run demonstration disk for 800's or a cassette 
for 400's is provided. Included for more extensive programming, is a 
printed source code listing compatible with valFORTHLI, available 
from Valpar International (see ad elsewhere in this issue). Compatibility 
with other FORTH's for Atari machines cannot be guaranteed. A printed 
listing of servo drivers and readers is provided in standard 6502 assem- 
bler mnemonics and MAY form the basis of user routines for advanced 
programmers in BASIC. 

The Apprentice ™ should not be regarded as a toy. Since it contains parts 
which may move suddenly , eye protection should be considered. 
Neither Valpar International nor Myotis Systems assume any liability for 
bodily injury resulting from use of this product orfor damage to any device 
attached to this product. 

Created by Mike White and Evan Rosen (co-author of valFORTH 1.1) 



Apprentice™ KIT and complete documentation _, 

(specify disk or cassette, PLEASE!) $295.00^^.8. 

valFORTH 1.1 (24K disk systems ONLY) / 

(Recommended but not required) $45.00 (u.S. 

The Apprentice™ T-Shirt \ 

(specify S M L XL) $6.00 U.S. 

Plus Shipping and Handling • VISA and MASTERCARD accepted 

For detailed information including expected availability of 
versions for other computers, price of assembled kits, 
expandability, specs, etc., and the bumpersticker, 

"Has your robot hugged you today?" 
send $1 and aSTAMPED, SELF-ADDRESSED envelope. 



MYOTIS SYSTEMS 

P.O. Box 13568 

Tucson, Arizona 85732 

(602) 326-5306 




"^W 







valFORTH !s a trademark of Valpar International 



Atari is a trademark of Atari Inc. 
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by Michael l\lev\/man 

Atlantis is an arcade-style game for an Apple^'^ with 16K RAM (32K 
disk), and an optional disli drive. 

Defend Atlantis! Long ago, the lost civilization of Atlantis fought a 
desperate battle against marauding aliens. The last hope of the ancient, yet 
technically advanced civilization lay in three "neutralizers," defensive 
weapons that nullified the energy blasts of the enemy. 

In Atlantis, you are the gunner manning the neutralizers. Only one of the 
neutralizers may be deployed at a time. Paddle 1 controls the position of the 
neutralizer along the bottom of the screen. Immediately below the 
neutralizer is the city of Atlantis. Above you is the calm blue sky. Soon, 
deadly energy missiles will descend upon you and the millions you defend. 
Pressing button 1 will fire the neutralizer. Be warned, however, that there 
are smart missiles that will try to avoid your fire. 

The city has a defensive energy shield that can absorb two energy missiles 
at any one point on its surface. A third strike at the same location causes the 
city to explode. 

Each missile you neutralize gains you points. If a missile hits any part of 
your neutraUzer, the neutrahzer is demolished. If you lose all three of your 
neutralizers, the city explodes. (If you lose your third neutralizer while your 
score is between 950 and 1000 points, missiles will continue to drop onto the 
city's shield.) Each impact of a missile on the outer layer of the shield gains 
you five points, and each strike on the inner layer gains you ten, so a bit of 
luck will bump your score to 1000 points, earning you an extra neutralizer. 

Atlantis has the ability to save the top fifteen scores on diskette. Your 
high score and up to 11 characters can be stored. If you do not have a disk 
system, do not include lines 140-220 and 21 10-2400. 



Variables 

A: Movement of ship. 

Al; Pitch of tone. 

B(*): Status of each position of 

outer shield. 

Bl: Duration of tone. 

D$: CHR$(4) for Apple disk 

operations. 

D(*): Status of each position of 

inner shield. 

H(*): Horizontal position of 

missiles. 

L: Status of paddle button 1. 

M: Number of missiles on screen. 

N: Number of normal missiles on 

screen . 

Nl: Maximum number of normal 

missiles allowed on screen. 

N2: Number of smart missiles. 

P: Indicates which missile on the 

screen is a smart missile. 

SoftSide 



Q: Vertical movement of missiles. 

R: Maximum number of smart 

missiles. 

Rl: Score needed for bonus 

neutralizer. 

S: Score. 

S(*): Speed of each missile. 

SI: Number of ships left. 

U(*): High scores. 

U$(*): Names of players with high 

scores. 

Ul: Horizontal movement of 

missiles. 

V(*): Vertical position of missiles. 

W: Flag to indicate if you have a 

free ship. 

X,Z: Loop variables. 

X$: Used to achieve proper 

spacing in high score list. 

Y(*): High scores on disk. 

Y$(*): Names of players with high 

scores on disk. 
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SS SS SS SS SS SS SS SS SB ss ss 

ss ss 

ss APPLESOFT BftSIC SS 

SS 'ATLANTIS' SS 

SS AUTHOR: MICHAEL NEMHAN SS 
SS COPYRISHT iC) 19S2 SS 
SS SOFTSIDE PUBLICATIONS, INC SS 
SS SS 

SS SS SS SS SS SS SS SS SS SS SS 

If you do not wish to type in this 
program, it is avaliabie on this month's 
SoftSide CV and DV. 

Initialize display and variables, and poke 
sound routine into memory. 

10 TEXT : NOTRftCE : SPEED= 255: HOHE 

20 POKE 768,173: POKE 769,48: POKE 

770,192: POKE 771.136: POKE 

772,208: POKE 773,4: POKE 77 

4,198: POKE 775,7 
30 POKE 776,240: POKE 777,8: POKE 

778,202 
40 POKE 779,208: POKE 780,246: POKE 

781,166 
50 POKE 782,6: POKE 783,76: POKE 

784,0 
60 POKE 785,03: POKE 786,96 
70 SPEED= 255 
80 DIM Yil5J,Y$!15),D(39},BI39), 

K(4) 
90 Rl = 1000 
100 DIH V(4),H(4),S(4),U(15),Uf( 

15) 
110 M = 1:S1 = 3:A = 15:Dt = CHR$ 

14) iR = 10 
120 U = R1:N = 30:N2 = 1 
130 R = 10 

Retrieve high scores from disi<. 

140 HOME : ONERR SOTO 230 

150 PRINT D$i"OPEN HIBH" 

160 PRINT 1}$;"READ HIGH" 

170 FOR X = 1 TO 15 

180 INPUT Y(X) 

190 INPUT nm 

200 NEH X 

210 PRINT Dtj "CLOSE HI6H" 

220 ONERR SOTO 3000 

Print high scores. 

230 PRINT : PRINT " ATLANTIS" 
240 PRINT "BY MICHAEL NEWMAN" 
250 PRINT : PRINT " 15 BEST 

SCORES SO FAR": PRINT 
260 FOR X = 1 TO 15: X$ = "" 




270 POKE 7,3: POKE 6,X t 6: CALL 
768 

280 IF YiX! = THEN Y$(X) = CHRI 

(95) + CHRI (95) + CHR$ (9 

5) 
290 IF X < 10 THEN X* = " " 

300 PRINT X$iX;" 

»!Y(X)i SPCf 5 - (Y(X) > 9) 
- (Y(X) .> 99) - (YiX) > 999 

) - (YiX) > 9999));Y«(X) 
310 NEXT X 
320 VTAB (23) 
330 PRINT "HIT ANY KEY TO BEGIN" 

;: GET KEY* 

Draw the background. 

340 HOME 

350 BR : COLOR= 14 

360 FOR X = TO 39 

370 IF X > 32 THEN COLOR= 

380 IF X = 32 THEN COLOR= 13 

390 HLIN 0,39 AT X 

400 NEXT X 

Draw Atlantis. 

410 COLOR= 13 

420 FOR X = 1 TO 39 STEP + 2 

430 PLOT X,35 

440 PLOT X,37 

450 PLOT X,39 



460 


NEXT X 


470 


COLOR= 10 


480 


HLIN 1,17 AT 33 


490 


VLIN 33,39 AT 1 


500 


VLIN 39,34 AT 7 


510 


PLOT 8,35: PLOT 9,34: PLOT 8 




,34 


520 


PLOT 38,35: PLOT 12,35: PLOT 




37,34 


530 


VLIN 34,39 AT 13 


540 


HLIN 11,17 AT 34 


550 


VLIN 39,34 AT 17 


560 


HLIN 20,22 AT 33 


570 


HLIN 25,39 AT 33 


580 


VLIN 39,34 AT 25 


590 


VLIN 36,34 AT 26 


600 


VLIN 36,34 AT 27 


610 


VLIN 39,34 AT 33 


620 


HLIN 31,39 AT 34 


630 


VLIN 34,39 AT 39 


640 


HLIN 31,35 AT 35 


650 


HLIN 31,34 AT 36 


660 


PLOT 38,35 


670 


PLOT 37,35 


680 


COLOR= 


690 


PLOT 34,36 


700 


PLOT 3i,37: PLOT 27,37: PLOT 




9,35: PLOT 11,35 


710 


FOR X = 19 TO 23 STEP + 2 


720 


PLOT X,39 


730 


NEXT X 
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Draw shields. 


Fire laser. 


1500 IF V(X) < 27 OR V(X) > 28 THEN 

1520 
1510 IF ABS (H(X) - A) < 3 THEN 


740 COLOR= 


1100 L = PEEK ( - 16286) 


750 HLIN 0,39 AT 31 


1110 IF « = 1 THEN L = 


1700 


760 HLIN 0,39 AT 30 


1120 IF L < 120 THEN 1260 


1520 IF V(X) = 30 THEN 1850 




1130 FOR X = 1 TO H 


1530 IF V(X) = 31 THEN 1830 


Print statistics. 


1140 COLOR= 


1540 NEXT X 




1150 VLIN 26,0 AT A 


1550 IF I = H THEN 810 


770 VTAB (22)! PRINT 


1160 FOR X = 1 TO « 


1560 IF « = 1 THEN 1040 


780 PRINT "SCORE: "iS," ATLANTIS 


1170 IF V(X) = 100 THEN 1240 




H 


1180 IF L < 120 THEN 1260 


Erase position of neutralizer. 


790 PRINT "SHIPS LEFT!"!S1 


1190 IF A < > H(X) THEN 1240 






1200 FOR P = 5 TO 14: COLOR= P: POKE 


1570 COLOR= 14 


Action starts here. 


7,1: POKE 6,P t INT ( RND ! 


1580 VLIN 29,27 AT A 




1) 1 3): CALL 768: PLOT H(X) 


1590 HLIN A - 1,A + 1 AT 28 


800 BOSUB 2460 


,V!X): NEXT P 


1600 HLIN A - 2,A + 2 AT 29 


810 IF N = 3 THEN 830 


1210 ViX) = 100:1 =1+1 




820 N = N - 1: GOTO 920 


1220 S = S + ((S(X) t 5) + (N2 t 


Plot new position of neutralizer. 


830 Nl = Nl + 1 


5) + SK(X) t 5)) 




840 IF Nl < H THEN 920 


1230 VTAB (22): PRINT "SCORE: "jS 


1610 A = INT ( PDL (I) / 5) 


850 N2 = N2 + 1:N1 = 


1240 NEXT X 


1620 IF A > 36 THEN A = 36 


860 IF N2 = 5 THEN 880 


1250 COLOR= 14: VLIN 26,0 AT A 


1630 IF A < 3 THEN A = 3 


870 60T0 920 


1260 FOR X = 1 TO M 


1640 Ul = A 


880 M = H + 1:N2 = 1:N = 30:R = R 


1270 IF V(X) = 100 THEN 1540 


1650 COLOR= 4 


- 2 


1280 PLOT H(X),V(X) 


1660 VLIN 29,27 AT A 


890 H = H + 1 


1290 POKE 7,2: POKE 6,ViX) 1 3: CALL 


1670 HLIN A - l.A + 1 AT 28 


900 IF R < 1 THEN R = 1 


768 


1680 PLOT A - 2,29: PLOT A + 2,2 


910 IF H > 4 THEN H = 1 


1300 COLOR= 14: PLOT H(X),ViX) 


9 




1310 V(X) = V(X) t S(XJ: IF K(X) = 


1690 SOTO 1040 


Set starting position of missile. 


1 THEN 1390 




920 FOR X = 1 TO N 


1320 P = INT ( RND (1) » N) + I 
1330 IF P = 1 THEN H(X) = H(X) + N2 


Neutralizer explodes. 


Make a "smart" missile. 


1340 IF P = 2 THEN H(X) = H(X) - 
N2 


1700 1=1+ 1:S1 = SI - 1 




1710 V(X) = 100:« = 1 


930 2 = INT ( RND U) t R) + 1 


1350 IF H(X) > 39 THEN H(X) = 


1720 FOR Z = 1 TO 14 


940 Ml) = 


1360 IF H(X) < THEN H(X) = 39 


1730 COLOP= Z 


950 IF Z = 1 THEN K(X) = 1 


1370 COLOR= 2: PLOT H(X),V(X}! 60T0 


1740 POKE 7,1: POKE 6,Z t 3: CALL 


960 S(X) = INT ( RND (1) t 3) + 


1490 


768 
1750 VLIN 29,26 AT A 


1 


1380 PLOT H(X),V(X): GOTO 1490 


970 H(K) = INT i RND (1) 1 30) + 
5 


1390 Q = INT (RND (1) » (N2 t 2 


1760 HLIN A - 2,A + 2 AT 29 


)) + 1 


1770 HLIN A - 3,A + 3 AT 28 


980 ViK) = 


1400 IF A < H(X) THEN = - fi 


1780 HLIN A - 2,A + 2 AT 27 


990 NEJT X 


1410 IF V(X) = 28 AND ABS (A - 


1790 NEXT Z 

1800 VTAB (23): PRINT "SHIPS LEF 


1000 H = SI + 1:1 = 


H(X!) < (N2 » 2) + 3 THEN H( 


1010 IF H = 1 THEN 1040 


X) = A + 1 


T!"iSl 
1810 Ul = A 


1020 IF A = Ul THEN 1100 


1420 IF V(X) = 27 AND ABS (A - 


1030 IF A = 100 THEN A = 15 


H(X)) < (N2 » 2) + 3 THEN H( 


1820 A = 100 


Award an extra neutralizer. 


X) = A + 1 


1830 IF SI < 1 AND (S < 950 OR S 




1430 H(X) = H(X) + e 


> = 995) THEN 1970 


1040 IF S < Rl THEN 1100 


1440 IF A = H(X) THEN H(X) = H(X 


1840 GOTO 1540 


1050 Rl = Rl + U!S1 = SI + 1 


1 - INT ( RND (I) « (4 t N2 


iU~V uu 1 U i u » V 


1060 W = 


)) - (2 t N2) 


Missile hits shield at screen line 30. 


1070 VTAB (23) : PRINT "SHIPS LEF 


1450 COLOR= 1 




T:"iSl: VTAB (20) 


1460 IF H(X) > 39 THEN H(X) = 


1850 IF B(H(X)) = 1 THEN S(X) = 


1080 FOR K = 1 TO 6: PRINT CHR$ 


1470 IF H(X) < THEN H(X) = 39 


1: GOTO 1540 


(7);: NEKT ){ 


1480 PLOT H(X),V(X) 


1860 B(H(X)) = 1:S = S + 5 


1090 A = Ul 


1490 IF V(X) > 38 THEN 1970 


1870 SOTO 1900 
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Missile hits shield at screen line 31. 


2210 


PRINT "YOU N0» ARE ONE OF T 




APPLE™ SWAT TABLE FOR: 






HE 15 BEST PLAYERS 1" 


ATLANTIS (CASSETTE VERSION) 


1880 IF D(H<X)) = 1 THEN 1540 


2220 


SOTO 2240 








1890 DiHiX)) = hS = S + 10 


2230 


UiXJ = Y(X):Ut(X) = Y$(X) 




SWAT 




1900 FOR I = 15 TO 10 STEP - 1 


2240 


NEXT I 


LINES 


CODE 


LENGTH 


1910 COLOR:= Zi POKE 7,1: POKE 6, 


2250 


GOTO 2280 














20 + Z * 2: CALL 768 


2260 U(X) = Y(X - 1):U$(X) = Y*(X 


10 - 120 


LS 


331 


1920 PLOT HCO.Viri 




- 1) 


130 - 330 


SB 




1930 NEH Z 


2270 


NEXT X 


340 - 450 


PX 


ii"' 


1940 ViXI = 100:1 = I M 


2280 


IF = THEN 2370 


460 - 5'"0 


QV 


171 


1950 VTflB (22): PRINT "SCORE: ":S 


2290 


PRINT D«!"0PEN HI6H" 


530 - 690 


NJ 


152 


1960 SOTO 1540 


2300 


PRINT D$; "WRITE HIGH" 


700 - 810 


UA 


133 




2310 


FOR X = I TO 15 


S20 - 930 


«Z 


172 


Atlantis explodes. 


2320 


PRINT U(X) 


^40 - 1050 


EN 


183 




2330 


PRINT mm 


lOoO - 117i' 


ZQ 


V! 


1970 FOR Z = TO 10 STEP + 2 


2340 


NEXT X 


1180 - 12^0 


il 


256 


1980 COLOR= Z 


2350 


PRINT Dt; "CLOSE HIGH" 


i30i' - 1410 


SR 


279 


1990 FOR I = 33 TO 39 


2360 


GOTO 2410 


1420 - 1530 


SR 


265 


2000 HLIN 0,39 AT t 


2370 


PRINT : PRINT : PRINT 


1540 - 1650 


PX 


147 


2010 SOUND = PEEK ( - 16336) + PEEK 


2380 


PRINT "WELL VOU DIDN'T MAKE 


1660 - 1770 


SY 


111 


( - 16336) + PEEK i - 16336 




HIGH SCORE." 


rSd - 1890 


m 


:09 


) + PEEK < - 16336) 


2390 


PRINT : HTAB 10 


1900 - 2010 


BJ 


213 


2020 NEST X 


2400 


PRINT "KEEP TRYING'" 


2020 - 2430 


OZ 


230 


2030 Z = Z - 1: IF Z > 4 THEN 198 






2440 - 2550 


UX 


307 





Prompt for next game. 


25^0 - 3000 


RE 


117 


2040 COLOR= 1 

2050 FOR Z = 39 TO STEP - h HLIN 


2410 
2420 


VTAB (23) 

PRINT "DO YOU NANT TO PLAY 














0,39 AT Z: POKE 7,1: POKE 6, 

-1 j> n nnij -^/n ktr*ii-T" t 




AGAIN?"; 








Z » 2: CALL 768: NEXT Z 
2060 COLOR= 10 


2430 
2440 


CLEAR : GET A$: PRINT A$: HOME 
IF A$ = "Y" THEN 10 


APPLE^'-' SWAT TABLE FOR: 
ATLANTIS 


2070 FOR Z = TO 39: HLIN 0,39 AT 


2450 


END 


r^ 1 br^iv 1 t\J 






Z: POKE 7,1: POKE 6,Z 1 2: CALL 








SWAT 




768: NEXT Z 
2080 SPEED= 5 


Sound routine. 


LINES 


CODE 


LENGTH 








2090 VTAB 123): PRINT "SAME OVER 


2460 


FOR X = 1 TO 36 


;o - i2ii 


LS 


331 


it 


2470 


READ Al.Bl 


\Z'.- - Ji^' 


VM 


!"7 


2100 SPEED= 255 


2480 


IF PEEK (49152) > 127 THEN 


250 - 3611 


LN 


2v7 






POKE 49168,0: GOTO 2510 


3^0 - AS-. 


TM 


127 


Print final results. 


2490 


POKE 7,A1 » 3: POKE 6,B1: CALL 


i'ii) - oOti 


HtJ 


185 






768 


oJi'i - 720 


XP 


lt.7 


2110 = 0: TEXT : HOHE 


2500 


NEXT X 


"30 - 840 


FF 


16.? 


2120 FOR X = 1 TO 15 


2510 


FOR X = 1 TO 1000: NEXT X: RETURN 


S5i.i - '*ii.! 


KY 


!-'9 


2130 IF S < YiX) THEN 2230 


2520 


DATA 40,181,40,181,40,181,2 


n'- - 1080 


QM 


198 


2140 IF = 1 THEN 2260 




0,230,10,152,40,181,40,181,4 


U''iO - !;(.:■'. 


J I 


202 


2150 = hUfX) = S 




0,181,20,230,10,152,40,181,2 


1210 - 1320 


AF 


237 


2160 PRINT : PRINT : PRINT 




0,230,10,152,40,181 


\m - 1440 


OD 


311 


2170 PRINT "C N 6 R A T U L A 


2530 


DATA 20,230,10,152,40,181 


!45'^ - 1560 


TP 


198 


T I N S" 


2540 


DATA 40,181,40,181,40,122,4 


1570 - 16S0 


RX 


162 


2180 PRINT "VOU SCORE IS ONE OF 




0,122,40,122 


1690 - 1800 


TR 


131 


THE BEST SO FAR." 


2550 


DATA 20,117 


181M - 1«20 


BU 


216 


2190 PRINT "PLEASE TYPE YOUR NAM 


2560 


DATA 10,152 


1*?30 - 2040 


UU 


189 


E!": INPUT U$fX): IF Uf(X) = 


2570 


DATA 40,181,40,181,40,181 


2i!50 - 21 aO 


EF 


215 


"" THEN UtiX) = CHRf (95) + 


2580 


DATA 20,230,10,152,40,181,2 


2170 - 2260 


MG 


3b 1 


CHRt (95) + CHR$ (95) 




0,230,10,152,40,181,20,230,1 


2190 - 2400 


SY 


1<'2 


2200 IF LEN (U*(X)) ,> 11 THEN PRINT 




0,152 


2410 - 2520 


OV 


2^0 


"NO MORE THAN 11 LETTERS PLE 


2590 


DATA 60,181 


253- - 3000 


OS 


195 


ASE.": GOTO 2190 


3000 


END © 
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LOGO. Turtle graphics. Kids and 
computers. These are the first im- 
pressions most people have of this 
wonderful language, newly adapted 
for microcomputers. But LOGO has 
much more to offer than these im- 
mediately visible features. The other 
half of the language is a 
sophisticated set of word and 
number manipulation commands. 
Buried in all of this is a fascinating 
point of view about the interface 
between computers and the human 
mind, and how this interaction can 
enhance learning and creativity. 

Growing out of Seymour Papert's 
work with artificial intelligence, 
LOGO has become an interactive 
programming environment suitable 
for very young children, severely 
handicapped persons, college 
students and adults. Make no 
mistake, LOGO is not a toy 
language; it is as sophisticated as its 
user. Papert was a student of the 
famed French psychologist Piaget, 
who made the study of human 
development a major, serious, 
branch of psychology. Anyone who 
has taken a course in educational 
psychology is familiar with Piaget' s 
contributions to our understanding 
of the development of the human 
mind. In his book, Mindstorms: 
Children, Computers And Powerful 
Ideas (Basic Books, Harper Col- 
ophon CN 5077, NY 1980, 230pp., 
$6.95), Papert discusses this interac- 
tion between the computer and the 
human mind as it relates to young 
children and the learning process. 
The artifical intelligence project at 
MIT and at Bolt, Beranek and 
Newman (the famed acoustical con- 
sulting and research firm in Cam- 
bridge), led to the development of 
another language, LISP (LIST 
PROCESSING) which is a larger, 
more complex language — the 
parent of LOGO. The name LOGO 
itself was coined by Wallace 
Feurzeig at BB&N and is not an 
acronym, but takes its meaning 
from the Greek for thought or 
word: logos. Presently, LOGO ex- 
ists in four implementations for the 
Apple^***, plus versions for Texas In- 
struments, and Radio Shack Color 
computers. 

(l)Apple LOGO, written by 
LOGO Computer Systems in 
Quebec and sold by Apple. $175. 

(2)MIT LOGO, sold by Krell 
Software. $150. 



LoGO: 

The Programmer- 
Friend ly Language 

Reviewed by Steve Birchall 
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(3)MIT LOGO, sold by Terrapin, 
Inc. $150. 

(4)Cyberlogo, a less versatile ver- 
sion which requires only 48K, sold 
by Cybertronics International, 999 
Mount Kemble Ave., Morristown, 
NJ 07960. $99. 

(5)Texas Instruments LOGO has 
additional graphics concepts called 
Sprites and some animation 
capabiUty, but lacks some of the 
word handling commands of the 
Apple versions. 

(6)Radio Shack's Color Com- 
puter version is the most limited (it 
only takes 32K), providing turtle 
graphics and some arithmetic 
capabilities. All have differences, 
but do substantially the same things, 
except as noted. 

More are on the way, and we 
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A Product Ot togcj CC^OiitK Systems. I'X^ 



should soon see LOGO for the 
Atari® and IBM® PC, among 
others. 



Structure 



Overall, LOGO is a language 
which is procedural, interactive, and 
recursive. You write short program 
modules (called procedures) which 
do particular things, give them 
descriptive names, and chain them 
together for larger tasks. It 
"learns" procedures which you 
"teach" it and can use these later in 
more complex program structures. 
If the language lacks a command 
(called primitives in LOGO) you 
would like to have, simply define it 
as a procedure and it will always be 
available to you by name. Try that 
with BASIC, and you must resort to 
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Figure 1 



Figure 2 





a GOSUB procedure which you can- 
not name but must refer to by line 
number. Fitting a GOSUB into 
another program requires tedious 
revisions. 

LOGO is interactive because it ex- 
ecutes the primitives as you enter 
them so you can see the results and 
make corrections as you go. If you 
forget to define a new procedure, 
LOGO simply asks for the instru;;- 
tions, and from then on the com- 
puter remembers what to do. The 
error messages tell you what the 
computer can't understand and 
point to a correction. 

Recursion is the ability of a pro- 
cedure to use its own definition as 
part of a larger structure. 
Graphically, it creates spirals, 
mazes, and other designs. Used in 
number and word operations, recur- 
sion produces amazing patterns, 
even pseudo-poetry. 



Turtle Graphics 

To give you a feeling for how 
easily LOGO draws you into its en- 
vironment, I will "crawl through" 
some short examples of LOGO pro- 
grams using the Turtle Graphics for 
which it is well-known. The screen 
says "WELCOME TO LOGO" and 
below that is the prompt character, 
a "?". Since everybody starts ex- 
plaining Turtle Graphics by drawing 
a square, let's make it just a little 
more interesting and ask the Turtle 
to draw a pentagon, which is a dif- 



ficult figure to draw by hand. Defin- 
ing a procedure is easy: we type in 
?T0 PENTAGON 
and the prompt for definitions 
appears 

So now we can type 

>)FD 50 RT 72 FD 50 RT 72 FD 50 
RT 72 FD 50 RT 72 FD 50 RT 72 

>END 

LOGO responds by saying 
PENTAGON DEFINED 
Now we type 
7PENTAGON 

and watch as the Turtle races 
around the boundary of a five sided 
regular polygon on our screen (Fig. 
1). Notice that the program took on- 
ly three lines, two of which were 
simply to start and stop the process. 
How much thinking and cleverness 
were required? We had to do 
nothing more than tell the Turtle 
how far to move forward, which 
direction and how far to turn, and 
repeat the process five times. Know- 
ing that pentagons have an interior 
angle of 72 degrees (i.e. 360/5) 
presumably came from earlier ex- 
perimentation with squares and 
other polygons and was acquired in- 
tuitively and interactively. Try do- 
ing this in BASIC, Pascai or (shud- 
der) FORTRAN. Line two is rather 
tedious. You wouldn't want to do 
that for a 500 sided figure. So 
LOGO has a shorthand notation: 

REPEAT 5 [FD 50 RT 72] 
To make pentagons of any size, we 
could make the instructions more 
general and write the program 



?TO PENTAGON :SIDE 
REPEAT = [FD :SIDE RT 72] 
END 

7PENTAGON 60 

If we had typed in just the 
primitive PENTAGON, LOGO 
would have replied "NOT 
ENOUGH INPUTS" to remind us 
that we have to specify the length of 
a side in this revision of the pro- 
gram. Now the Turtle has drawn 
another, smaller pentagon over the 
first one (Fig. 2 ). Drat! Forgot to 
clear the screen. But this looks in- 
teresting anyway, so we start filling 
the screen with pentagons of dif- 
ferent sizes. We begin to wonder 
what would happen if we did this 
7REPEAT 10 (PENTAGON 45 RT 
36) 

Here the Turtle has drawn 10 pen- 
tagons 36 degrees apart. This is 
more Uke it ( Fig. 3 )! Wow, let me 
see if I could make it. . . 

There you see the essential spirit 
of LOGO. It turns you on intellec- 
tually. LOGO leads you to ask more 
and more questions about abstract 
ideas and their relationships. LOGO 
gives you the answers, leading you 
to more questions. Within a short 
time you are writing complicated 
programs easily. Because the pro- 
grams can use (by means of a one 
word primitive-label) already 
established procedures as building 
blocks for more elaborate struc- 
tures, LOGO programs are easy to 
understand. For the last program, 
the comparable listing in BASIC 



78 i 



SoftSide 



/1PPLE 



Figure 3 



Figure 4 





would be indecipherable as to what 
it does (as well as longer and more 
difficult to write and debug). You 
can save all your work on disk. 
Tomorrow when you come back to 
the computer, you can start where 
you left off. A good example of 
what might take place in the next 
day's work is writing a program to 
generate polygons with any number 
of sides — triangles, squares, or 
25-sided figures. With only a small 
amount of trial and error, you will 
find out how to derive the proper 
angle and generalize the instruction 
set. 

?T0 POLYGON :SIDES 
:LENGTH 

REPEAT :SIDE [FD :LENGTH 
RT 360/SIDES] 
END 

To draw a triangle, we type in 
7POLYGON 3 100 
and the Turtle draws a triangle with 
sides 100 units long (Fig. 4). You 
wonder how you could draw a cir- 
cle? Thinking of a circle as a 
polygon with an infinite number of 
sides opens the door to further 
thought. This is only the beginning 
of learning much more interesting 
things to do. Writing more 
sophisticated programs for drawing 
a house or a portrait of a friend is a 
practical possibility. 



Words And Lists 



In word and list operations, 
LOGO can be quite useful. To start. 



LOGO has some primitives to take 
care of routine operations. 

WORD assembles letters, 
numbers, or groups of them into a 
single entity. 

?WORD [C OMP U TE R] 
COMPUTER 

?WORD (12 56) 
1256 

?WORD (1 25 6) -I- (54 34) 
6690 

A list is a group of words set off 
with square brackets. 

[BLUE FOX RUNS] 

SENTENCE puts words together. 
FIRST, BUTFIRST, BUTLAST 
and LAST give you particular 
elements of a Ust or word, much as 
LEFTS, MID$, and RIGHTS do in 
BASIC 

7FIRST [BLUE FOX RUNS] 
BLUE 

7BUTFIRST [BLUE FOX RUNS] 
FOX RUNS 

7BUTLAST [BLUE FOX RUNS] 
BLUE FOX 

7FIRST [12 36 48 144] 
12 

Some interesting word games are 
possible with these primitives. You 
could make a list of computer buzz 
phrases very easily by using the 
PICKRANDOM procedure. 



7T0 BUZZPHRASE 
>MAKE "WORDl (STATIC 
FLOPPY DOUBLE. DENSITY 
MICRO PERSONAL INTERNAL 
DIGITAL MODULAR) 
>MAKE "W0RD2 (BIT ROM 
ALGORITHM BYTE HEX AR- 
RAY CHARACTER ALIEN DOS) 
>MAKE "WORD3 (GEN- 
ERATOR RAM CONTROLLER 
FIRMWARE SPREADSHEET 
SOFTWARE INTERFACE 
GRAPHICS) 
>WRITE 
>END 



?TO WRITE 

> PRINT SENTENCE 
(SENTENCE (PICKRANDOM 
rWORDl) (PICKRANDOM 
:WORD2))(PICKRANDOM 
:WORD3) 

> WRITE 
>END 



7BUZZWORD 

INTERNAL ALIEN GRAPHICS 

INVERSE DOS SPREADSHEET 

FLOPPY ALGORITHM 

GENERATOR 

PERSONAL HEX 

CONTROLLER 

MICRO ALIEN SOFTWARE 

INVERSE ALIEN FIRMWARE 

FLOPPY ARRAY 

CONTROLLER 

DOUBLE.DENSITY ALIEN 

INTERFACE 

FLOPPY BYTE 



SoftSide 



79 



APPil 



REGISTER 16BIT 
CHARACTER INTER- 
FACE 



The period between 
DOUBLE and DENSITY is 
a LOGO convention which 
tells the interpreter to con- 
sider it as one word, while 
permitting you to see it as 
two. While you can have 
fun playing with pro- 
cedures like this, you can also see 
the possibilities for extending them 
into more complex structures by us- 
ing them as building blocks for 
larger programs which manipulate 
words and Hsts. 

Since LOGO is interactive, you 
can test and debug as you go, 
avoiding problems before they 
become serious. If you want to get 
really fancy, you can use title pages, 
menus, instructions and other helps, 
just as you are accustomed to doing 
in BASIC. Once you have written 
procedures for these kinds of main 
program utilities, you can save the 



''Since LOGO is interactive, 

you can test and debug as you 

go, avoiding problems before 

they become serious, " 



entire group of procedures and use 
them whenever you write other large 
programs. Once you teach LOGO a 
procedure, you can use it as a 
module in larger and more difficult 
programs. You don't have to 
remember and specify in detail how 
to do it each time. Just use the 
name of the procedure. If you need 
to know how the procedure works, 
LOGO will give you a listing. Also, 
consider how "user friendly" pro- 
grams written in LOGO can be. 
More importantly, consider how 
"programmer friendly" LOGO 
itself is. This is one of the most im- 
portant aspects of this lanuage: it 



makes writing a program 
easy by making the function 
of a procedure obvious, and 
by letting you give it a name 
providing instant recogni- 
tion of its' function. 



Notation For 
Choreography 



At a meeting of the Bos- 
ton Computer Society's LOGO 
Users Group, I observed an unex- 
pected application for LOGO. 
Michael Grandfield, a student at 
Lesley College, had discovered that 
LOGO could form the basis for an 
Interactive Dance Notation. This is 
a truly revolutionary idea, because 
dance has never had an adequate 
notation, (The existing systems such 
as Labanotation are woefully in- 
capable of conveying essential infor- 
mation.) and, traditionally, dance 
has been passed on from person to 
person as an oral and demonstrative 
tradition. Grandfield had conjured 
continued on page 82 
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FORM OF PAYMENT 

USA 

VISA, MasterCard, certified checks, money orders and personal 
checks are accepted. 

Canada/IMexIco 

The preferred method of payment is by VISA or MasterCard. A 
bank check is acceptable if it has been preprinted for payment 
in U.S. dollars. No personal or company checks accepted. 

Other Foreign Orders 

Payment must either be by a bank check drawn on a U.S. bank 
payable in U.S. dollars or by affiliated bank credit cards of VISA 
or MasterCard. 

GUARANTEE 

All software is guaranteed to load and run. If you experience dif- 
ficulties with the product within 30 days, it may be returned for 
replacement. Send your properly protected tape or disk to the 
attention of the Customer Service Representative and include 
your name, address, and the reason it is being returned. 

UABILITY 

All software is sold on an as-is basis. SoftSlde assumes no 
liability for loss or damage caused or alleged to be caused 
directly or indirectly by products sold or exchanged by them or 
their distributors, including, but not limited to, any interruption 
in service, loss of business or anticipatory profits or consequen- 
tial damages resulting from use or operation of such software. 

PRICES 

Prices are subject to change without notice. We are not respon- 
sible for typographical errors. 



Unless otherwise noted In a published advertisement, 
following prices are in effect as of this issue: 



the 



SofiSide Magazine (yr) 
SoftSlde Magazine (6 mo. 


USA/Canada first class Other 
APO/FPO Mexico Foreign 

$30 $40 $62 
$15 $20 $31 


CV (year) & magazine 

(6 mo.) 
DV (year) & magazine 

(6 mo.) 


USA Mexico 
APO/FPO Canada 

$75 $95 
$40 $50 
$125 $145 
$70 $80 


Other Foreign 

$125 
$70 
$175 
$90 


Adventure of the Month 

3-Mo. Trial 
6-Mo. 
12-Mo. 
24-Mo. Charter 




Disks 

$29 
$49 
$89 
$169 


Cassettes 

$19 
$29 
$49 
$89 



BACK ISSUES 

Minimum order for magazines only — 3 issues. There is no 
minimum order for magazine/media combinations. 
Price includes shipping to the 48 states only. Alaska, Hawaii, 
Puerto Rico, APO/FPO, and ALL foreign orders — postage is ad- 
ditional. 

ALL Foreign orders and all magazine/media combination orders 
— Order directly from SoftSide, 6 South St., Milford, NH 030SS. 
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The 
Adventure 

is Waitin 

for You- ♦ 

How would you like to go back in time to 19th cen 
London to match wits with Jack the Ripper? Out 
space to brave the swirling vortex of a black hole? 
the depths of the ocean, or on a quest to resc 
beautiful princess from the clutches of evil 
nnonsters? 

You never know where SoftSide Magazine's 
Adventure of the Month Club might take you. But 
you can be sure that each month you will experience 
new delights and new challenges as you receive 
original adventure on tape or disk, ready to load 
your computer. 

And now It's even easier for you to join Adventu 
of the Month. A Trial Membership (3 months, 3 differe 
Adventures), costs only $29 for Disks, $19 for 
Cassettes. 

Or choose a Charter Membership, available on di 
tape, for 6 months, 12 months, or 24 months, 
choice of a 24 month Charter Membership will bring 
a savings of almost half on the individual price of 
Adventures you'll receive. 

Super Disks, each containing three Adventures, 
also available for $26 each. 
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Advanturs #19 — Alaskan Adventure 

Brrrrr, It's cold. You're In Alaska, standing in the snow. 
Around you, fifteen treasures are tiidden. Some are buried In 
the snow, ottiers are cacfied In nearby igloos. Some are in 
even stranger places, and you will need considerable in- 
genuity to get them. Everything has a purpose, so use your 
Imagination. And get moving. There's a nice, warm parka 
nearby, but you'll turn blue If you don't find It soon. 



Adventures Available: 



June 1981 

Arabian 

Adventure 

July 1981 

Alien 
Adventure 

August 1981 
Treasure Island 

September 1981 
Jack The Ripper 

October 1981 

Crime 

Adventure 

November 1981 

Around the World 

in Eighty Days 

December 1981 
Black Hole 



January 1982 
Windsloe Mansion 

February 1982 

Klondike 

Adventure 

March 1982 
James Brand 

April 1982 
Witches' Brew 



July #14 
Robin Hood 



August #15 

The Mouse 

That Ate Chicago 



September #16 
Menagerie 



May 1982 
Titanic 

June #13 
Arrow One 



October #17 
The Deadly Game 



November #18 
The Dalton Gang 



For more delaHed information on prices, and to enter your 
membership, see the handy poslage-free bind-ir> card found 
facing page BO of this Issue. 
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LOGO continued 



up a screenful of animated figures 
leaping and running around an im- 
aginary stage quite realistically. 
Moreover, the primitives to do all of 
this were simple words which almost 
anyone could learn quickly (TURN 
30 LEAP 10). For the first time in 
the history of dance, a choreo- 
grapher has the opportunity to no- 
tate his dance and actually see the 
patterns of movements — the visual 
rhythms — displayed in real time. 
He can make changes and perfect 
the dance composition's organiza- 
tion and structure before teaching it 
to an ensemble of dancers (which is 
time-consuming and expensive). Be- 
cause the notation conveys 
the movements and stage 
positions to the dancers so 
quickly and graphically, the 
process of learning the 
choregraphy is faster (and 
perhaps will become cheap- 
er). You can repeat par- 
ticular segments, freeze the 
display, slow it down, or 
even have the figures draw 
lines on the screen to show 



their movements and make under- 
standing easier. What remains is to 
teach the fine points of the inter- 
pretation. This is what musicians 
are accustomed to doing with their 
combination of notation and the un- 
written tradition of style and inter- 
pretation passed on from teacher to 
student, generation to generation. 



How Is It Done? 

Besides the Turtle, LOGO can 
have figures called Sprites. These 
have user-definable shapes and can 
be animated. (The Te.xas In- 
struments version has some Sprite 
capabilities built in.) To do it with 



**.,,the Sprites move completely 

independently of each other in 

speed and direction, have 

different shapes, and can 

change those shapes while 

moving 



>> 



Apple LOGO requires an extra 
board with 16K more memory and 
an auxiliary video microprocessor. 
The results are astonishing: the 
Sprites move completely in- 
dependently of each other in speed 
and direction, have different 
shapes, and can change those shapes 
while moving — all against a 
background drawn by the Turtle. 
The background could range from a 
simple perspective view of a bare 
stage to a complete .set. (Since the 
sets can be changed instantly 
onscreen, some interesting 
challenges to existing theatre 
stagecraft result.) The first step 
in Grandfield's process is to 
use the shape editor to 
create outlines of dancers in 
various positions. A total of 
55 Sprite shapes is possible. 
The editor is very easy to 
use. You select the shape 
you wish to edit, and it 
presents an expanded view 
divided into a gridwork of 
squares. You move the cur- 
sor to the square you 

continued on page 85 
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Wliat 1b your favorite tjrpe of game; apace, 
arcade, or adventure? "Journey Tb Tlie 
Planetfl" presents an intriguing combination 
of all three aa you find youraalf on a strange 
planet in a strange universe. Luckily, the 
local goda are friendly and supply you with 
■energy, a spaceship, and weaponry. In turn, 
you agree to search the universe for treasures 
for the gods. Board yonx ship, talce off, 
accelerate through the upper atmosphere and 
out Into space. Your flight should take you 
past many other inviting planets. With a slow 
approach and skilled maneuvering, you drop 
down through the planet's sky to a soft 
landing on its surface. Disembark and wander 
through several TV screens full of mystery 
and excitement. A different adventure awaits 
3rou on each planet. 
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necessary to solve each adventure, your seoxv, 
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After you capture all the treasures this 
universe has to offer, return to your adopted 
planet. Who knows, the gods may be so happy 
that you can convince them to send jrou back 
to your real home. You can*t get there without 
their help! 

Available from your local Atari retailer or 
send *Z9.9B in check or money order 
(Callfomla residents add 6Vg% sales tax) to 
JV Software Inc. 

Atari - and 400/800 " are trademarkB of AEfcHl, Ino. 
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want to change, and turn it on or 
off, continuing until you have the 
shape you want. When reduced to 
normal size, its outlines become 
smoother and more rounded. 
Grandfield used his 55 available 
Sprite shapes to create several series 
of figures in slightly different posi- 
tions and postures. (They would 
animate if placed in a flipbook for- 
mat.) Each series contains the 
movements for a leap or jete or 
whatever dance movement the 
choreographer wants to include in 
his working vocabulary. 



Dress Rehearsal 



Next, he wrote LOGO procedures 
to present these Sprite shapes in the 
proper sequence to make his dancers 
walk, leap, and turn as they move 
across the stage. When you say 
LEAP, LOGO executes the 
primitives. Grandfield gave his 
dancers whimsical names (Uke Fred 
and Ginger) so he could identify 
each one easily onscreen and in the 
instruction sets. A complete dance 
sequence becomes nothing more dif- 
ficult than writing a Ust of instruc- 
tions using readily-recognizable 
words, rather than PEEK, POKE, 
HPLOT, etc. You could write: 
?TELL FRED (SETSPEED 35 
TURNLEFT 90 WALK 3 
SETSPEED 50 LEAP 10) 



? TELL GINGER (SETSPEED 20 
TURNRIGHT 45 WALK 2 
SETSPEED 20 JETE 45) 

and watch the two figures move ac- 
cording to your instructions. 

To make all the dancers move in 
synchronization, you write another 
short LOGO procedure which ex- 
ecutes the first command in each 
dancer's list, then the second, and 
so on, until the lists are exhausted. 
A common clock rate or beat ap- 
plies to all the dancers, 
regardless of the speed set, 
so you can plan all the 
movements. The wonder- 
ful thing about all of 
this is that LOGO permits 
you to write a program and 
accomplish an extraor- 
dinarily useful task with 
ease and elegance. To write 
a similar program in BASIC 
would be time-consuming. 



tedious, boring, and so intimidating 
most people would never attempt it. 
Grandfield, whose education is in 
dance, not computer engineering, 
did this after only a few months' ex- 
posure to LOGO. 

In the Krell and Terrapin ver- 
sions, LOGO has musical 
capabilities. Not only can music and 
dance be synchronized but new 
kinds of audiovisual arts become 
possible, created directly for the 
medium (using all the visual 
transformations of the Sprites), or 
translated into live performance 
music and dance. 

Grandfield worked with LCSI 
(developers of Apple LOGO) in 
Montreal this past summer, helping 
them work out their Sprite board. It 
should be available late in 1982 or 
early 1983. No doubt, it will include 
some of his choreographic work in 
its documentation. A dancer 
himself, he said, "I don't think 
there is a more flexible or ap- 
propriate language to work out 
dance." 

This interactive, user-friendly, 
animated dance notation is one of 
the most revolutionary develop- 
ments in the history of 
choreography. The impact of this 
invention on the future of dance will 
be profound, and Michael Grand- 
field has become a revolutionary 
figure for having the imagination 
and foresight to put these ideas 
together so beautifully and effec- 
tively. His application is an excellent 
example of what Seymour Papert 
had in mind when he began develop- 
ing LOGO. 

Each successive generation of 
computer languages has made the 
computer more available and 
friendly to non-experts. BASIC cer- 
tainly has made that claim, and has 
also succeeded admirably in making 

'%OGO offers possibilities 
beyond BASIC, in the same 

way that BASIC was an 

improvement over Fortran, 

and Fortran an improvement 

over machine code, etc, " 



computers accessible to more peo- 
ple. BASIC has its faults, but the 
marriage of BASIC to a micro- 
processor was the genesis of the per- 
sonal computer industry. LOGO of- 
fers possibilities beyond BASIC, in 
the same way that BASIC was an 
improvement over Fortran, and 
Fortran an improvement over 
machine code, etc. No software 
written in LOGO has appeared on 
the market. However, that will 
change rapidly. For the moment, 
memory is the biggest limitation, 
because LOGO occupies nearly all 
of 64K, leaving very little for input 
and subsequent processing. 
However, when LOGO is available 
for a computer with larger memory, 
like an Apple III, or an IBM PC, we 
should see some ingenious software 
developed for these machines. The 
graphics capability is awesome and 
specialized problem-solving pro- 
grams would be a natural outcome. 
Michael Grandfield's Interactive 
Dance Notation System is but the 
tip of the iceberg. Complex new 
games with amazing graphics, 
sophisticated word and list han- 
dling, and interactive techniques 
could develop. Think of games com- 
bining the strategy of chess with the 
word manipulation of Scrabble and 
player interactions of Monopoly. 
Imagine what an amazing Word 
Processor could be written in 
LOGO. Animated Business 
Graphics, with the Turtle tracing the 
curve, would be great. All of these 
projects and more are waiting to be 
explored. 



Weak and Strong Points 



LOGO does have some problems. 
The most obvious limitation is that 
it consumes nearly all of the 
available memory on a 64K ma- 
chine. To use Sprites mandates an 
additional memory and 
auxiliary microprocessor. 
Right now, all this is 
relatively expensive. But the 
price of memory is coming 
down and a sudden surge of 
demand from many LOGO 
users could drive it down 
very rapidly. Also, making 
LOGO the resident 
lanuage, instead of 
BASIC, would change the 
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picture considerably. 
Another problem is the pro- 
cess of storing and retriev- 
ing data. You must save it 
in the form of a list. For 
BASIC users, this requires 
some adjustment and looks 
like a potential problem. 
However, once you get the 
feel for this system, you 
begin to appreciate the ex- 
tra potential of being able 
to use LOGO'S word and 
primitives on data. 

I have heard comments on the 
fact that LOGO has no provisions 
for comments in programs. That 
sounds like a very serious criticism, 
because, as everyone knows, REMS 
are important in writing a good pro- 
gram. They help both you and the 
user to remember what various sec- 
tions do. Moreover, they are enor- 
mously helpful in the debugging 
process. The answer is that LOGO 
does not need REMs because they 
are built into the language. The 
names you give to your procedures 
are also REMs, and the advantage 



''LOGO takes us one step 

further in making computers 

more useful to people, so that 

they can tackle problems 

previously too difficult or 

time-consuming. 



>> 



of this approach is that you can't 
avoid using REMs. As a result, you 
always know what to expect when 
you ask for a procedure; its function 
is implicit in the name you gave it. 
LOGO users generally have an ac- 
tive interest in debugging their pro- 
grams. A good attitude toward 
debugging is built into the language 
because its interactive style gives 
you quick feedback — you know 
right away whether a procedure will 
work or not. With languages like 
BASIC or Pascal, you must write 
long sections of code before you 
have something which you can run 
to see if it works. In LOGO, you 



debug and perfect as 
you go, which engenders 
an entirely different 
attitude toward program- 
ming. No one in his right 
mind is going to be satis- 
fied watching the turtle 
make the wrong move- 
ments. LOGO also has 
good error messages which 
help to locate the source of 
a bug and what kind of 
problem the program has. 

What other exciting applications 
are waiting for someone to 
discover? LOGO takes us one step 
further in making computers more 
useful to people, so that they can 
tackle problems previously too dif- 
ficult or time-consuming. Already, 
LOGO is stimulating the demand 
for home computers in the same 
way VisiCalc® did just a few years 
ago. This significant improvement 
in the man/machine interface will 
unleash enormous amounts of 
human creative potential when more 
people start using computers in their 
daily hves. © 
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Reviewed by Steve Birchall 



by Harold Abelson from BYTE/ 
McGraw-Hill, Peterborough, NH, 
1982, 224 pages, $14.95. (This edi- 
tion is intended for users of Apple 
LOGO, and includes an appendix 
for Texas Instruments. Another edi- 
tion of the same book, LOGO For 
The Apple 11, is almost exactly the 
same, but is for users of MIT 
LOGO from Krell or Terrapin. In- 
cludes the Texas Instruments 
appendix.) 



This is an excellent tutorial on 
LOGO, written by one of its 
original developers at MIT. If you 
are at all interested in LOGO, read 
through this book before you buy 
the package, because it will give you 
an excellent overview of how the 
language works, what it can do, and 
how to use it. Abelson writes in an 
easy, conversational style, taking 
each of the principal topics in turn. 
Being more adventurous than most, 
and perhaps impatient to cover the 
field rapidly, I tried out the Turtle 
Graphics at the beginning of the 
book, and then dipped into the later 
chapters at random, wherever my 
interest led me. I fumbled a little, 
and had to backtrack a few times. 
Because of the nature of LOGO and 
the clarity of Abelson' s writing, 
however, I was able to learn the new 
primitives and procedures easily and 
without undue frustration. 

All the forms of LOGO come 
with thorough documentation, so 
why is a book like this necessary? 
Abelson shows how to use the 
language. The supplied manuals 
simply explain the primitives in a 
general sense, without drawing con- 
clusions about practical uses and 
relating them to your needs in 
writing programs. Abelson gives 
you that practical, working 
knowledge usually passed along ver- 
bally by a skilled teacher. Much of 
the "basic folklore" of working 



with LOGO is in the book, in- 
cluding the famous Polyspiral pro- 
cedure, the Doctor program, and a 
LOGO version oi Animals. Lots of 
useful routines and working 
knowledge, the kinds of things you 
would normally acquire by long 
hours of experimentation, are 
presented. Always, he gives ex- 
amples and explains how and why 
the procedures work. If you go 
through the book from cover to 
cover, working the examples as you 
go, you will certainly end up as a 
skilled practitioner of LOGO. In 
particular, his exposition of the 
word and list manipulation 
primitives is excellent. Far too many 
people are distracted by the Turtle 
Graphics and forget to go any 
further. 

As good as the book is, it has 
some faults. One important thing he 
overlooks is how to get printouts of 
Turtle Graphics. Neither his book 
nor the supplied manuals tell you 
how. Understandably, this varies 
considerably depending on the 
printer, controller card, and soft- 
ware you use, but some general ap- 
proaches would be helpful. The 
book is explicit in other areas, so 
why not here? Not everyone can 
figure this out without help. Fre- 
quently, part of this process in- 
volves storing the design on the 
screen as a picture file on disk, and 
this also is not covered in the 
manuals or the book. However, a 
brief item in the September, 1982 
POLYSPIRAL, the newsletter of 
the Boston Computer Society's 
LOGO Users Group, provides the 
key. Put an initialized DOS 3.3 disk 
in the disk drive and type 
?. PRINTER 6 

This loads the disk (assuming 
your drive is on Slot 6), but wipes 
out LOGO, and any procedures in 
the workspace not already saved. 
But the graphics buffer is still OK, 
so now you can type from BASIC 




BSAVE < filename > , 
A$2000,L$2000 

and this saves the picture onto the 
disk. From there you can run your 
screen dump program, and print the 
picture. They also give routines for 
using the Silentype printer and the 
Grappler card, referring to Ter- 
rapin's new technical manual for 
more details. Other possible in- 
teresting uses for pictures stored on 
disk include presenting a sequence 
of prepared pictures to illustrate a 
story or a lecture or to present 
business graphics at a meeting. 

Finally, Abelson doesn't give 
enough attention to the process of 
writing a larger program. This could 
be the subject of a companion 
volume, and would be a welcome 
addition. The present book excels at 
explaining short procedures, but 
leaves the structure of larger pro- 
grams nearly untouched. His 
chapters on interactive programs 
and the two examples (Doctor and 
Animals) really only hint at this 
topic. What are the idiomatic ways 
of assembling larger programs? Do 
you just string a bunch of pro- 
cedures together, or try to assemble 
them into intermediate sized sub- 
procedures which you can shuffle 
around? Should you start at the 
level of building a library of pro- 
cedures to draw on, or work from 
the end back to the beginning of the 
problem, inventing new procedures 
as needed? How do you make title 
pages, instructions to the user, or 
menus? How do you construct the 
timing loops to make them stay on 
the screen and fade out? How do 
you organize your screen displays? 
(LOGO has no tabs, but you could 
invent them easily.) All of these 
things may be obvious to some, but 
certainly not to all, and they need to 
be presented in an organized way, so 
that LOGO programmers can make 
effective use of the language's "user 
friendliness." © 
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MASTCft 

BLASTEft 




Master Blaster is an arcade- 
style game for the Apple™, re- 
quiring 16K (32K with dislc), Ap- 
plesoft, and paddles or a 
joystick. 

The object of this game is to 
stop the attacking aliens before 
they break through your deflec- 
tor screens and destroy your 
planet. Each aUen that manages 
to reach the screens will weaken 
them, until they are no longer 
able to repel the onslaught. 

You have at your disposal a 
powerful laser to defend against 
the invading horde. Aim the laser 
at the descending enemy with the 
joystick or game paddles, and 
use either button to fire. The 
game gets increasingly more dif- 
ficult, because after every fourth 
alien is destroyed, the rate of des- 
cent increases. 



Variables 




A,B: Loop counters. 

CO(*): Colors of aliens. 

DF: Flag to indicate if alien has 

broken through; yes if DF = 1 . 

FB: Number 127. 

H: Rate of alien descent. 

KB,KR: Keyboard read and 

clear (-16384 and -16368). 

E,F,J,K,L,LL,M,N,0,Q: Loop 

variables. 

P0,P1: Paddle buttons (-16286 

and -16287). 

PA: Delay loop variable. 
P0(*): Used in determining 
new random vertical position 
for an aUen. 

SC: Score. 

W(*): Position of deflector 

screens. 

X(*),Y(*): Coordinates of 

XP,YP: Coordinates of 

crosshair. 

ZO: Number 255. 

Z4,Z5: Numbers 259 and 143, 

used to compute paddle range. 
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122 VTAB 21: HTAB 8 + (SC < 9999 




r 


1 




) + (SC < 999) + (SC < 99): PRINT 
SC 
Draw some stars and increment rate of 






■ ■ : ■ 






A 
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descent. 




n'.t.t 






125 FOR L = 1 TO 5: HCOLOR= L: HPLOT 






° 




RND (1) » Z4 + 5, RND (1) t 










Z5 + 5: NEXT 










130 J = J + 1: IF J > 5 THEN H = 






. 




H + 1.5:J = 




„ 






140 POP 




i'AM 










''tiir 


*isr. -'r- 'lAi 

■ ■ ' 1 




Erase alien, move it, check if near deflector 
screens, draw alien. 

160 FOR A = 1 TO 4: SCALE= 1 
170 HCOLOR= 0: DRAM 2 AT X(A),Y( 

A) 
180 Y(A) = Y(A) + H: IF Y(A) = > 




j 




SCORE = 08086 


HI SCORE = 00060 J 




NIC) - 8 THEN 1000 
190 HCOLOR= COiA): DRAN 2 AT X(A 

),Y(A) 
200 GOSUB 30 




















205 NEXT 








210 FOR LL = 1 TO 6: GOSUB 30: IF 




ss ss ss ss ss ss ss ss ss ss ss 


Test for a hit. 


PEEK !P0) > FB OR PEEK !P1 




ss ss 




) > FB THEN LL = 6: 60SUB 40 




ss APPLESOFT BASIC SS 


50 FOR B = 1 TO 4 


220 NEXT LL 




ss 'HASTER BLASTER' SS 


SO IF ABS iX(B) - XP) < 11 AND 


Go back and move aliens again. 




SS AUTHOR: STEVEN WONB SS 


ABS (Y!B) - YP) < 9 THEN 10 






SS COPYRIGHT (C! 1982 SS 





230 GOTO 160 




SS SOFTSIDE PUBLICATIONS, INC SS 


70 NEXT 


An alien has landed. Cause alien to change 




SS SS 


Erase laser. 


color. 




SS SS SS SS SS SS SS SS SS SS SS 




1000 FOR E = 1 TO 7 






80 HCOLOR= 0: HPLOT 0, 100 TO XP - 


1020 HCOLOR= E: DRAW 2 AT X(A),M 




If you don't wish to type this program, 


3,YP! HPLOT 279,100 TO XP + 


(C) - 8 




It Is also Included on this month's 








SoftSlda CV and DV. 


3,YP 


1030 tf. TE t 35,5: i T255 / E,5 






90 RETURN 


1040 FOR PA = 1 TO 150: NEXT : NEXT 




Initialization. 


100 HCOLOR= 0: HPLOT 0,100 TO XP 


E 




10 GOSUB iOOO: GOTO 8000 


- 3,YP: HPLOT 279,100 TO XP 
+ 3,YP: DRAW 2 AT XfB),Y(B) 


Erase alien and one wail. 




Erase crosshair, get new paddie reading 




1050 HCOLOR= 




and draw crosshair. 


Explosion routine. 


1055 IF C > 3 THEN DF = 1: GOTO 






110 FOR K = 1 TO 2: POKE - 1629 


1090 




30 SCALE= 3:XP = INT i PDL (0) / 


8,0: FOR H = 100 TO 200 STEP 


1060 FOR D = TO 270 STEP 9 




ZO t 259 + 11):¥P = INT ( PDL 


50: h TR,5: NEXT : POKE - 1 


1070 HPLOT D,N(C) TO D + 9,«(C) 




(1) / 10 t 138 + 3): HCOLOR= 


6297,0: FOR H = 200 TO 100 STEP 


1080 FOR E = 100 TO 200 STEP 25: 




0: DRAN 1 AT n,Yl: HCOLOR= 


- 50: ?( T«,5: NEXT 


Ic TE,2: It T200 - E,25 NEXT 




3: DRAN 1 AT XP,YP: SCALE= 1 


115 NEXT K 


: GOSUB 30: HCOLOR= 0: NEXT 




:X1 = XPiYl = YP: RETURN 




1090 DRAW 2 AT X(A),NiC) - 8: IF 




Draw laser and mal<e laser sound. 


Scoring routine. 


DF THEN Y(A) = H(A) - 8: GOTO 






120 SC = SC t (160 - Y(B)):SC = INT 


2000 




40 HCOLOR= 5: HPLOT 0, 100 TO XP - 


(SC):XiB) = INT ( RND il) t 


1100 C = C + 1 




3,YP: HPLOT 279,100 TO XP + 


46 + PO(B)):Y(B) = 5:CC = INT 


1110 X(A) = INT ( RND (1) « 46 + 




3,YP: FOR S = 5 TO RND U) t 


( RND (1) 1 7 + l):COiB) = C 


PO(A)):Y(A) = 5 




75 + 75 STEP 5: & TS,2: NEXT 


C - !CC = 4) 


1120 GOTO 210 
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Aliens have broken through. 

2000 SCALE= 3: HCOLOR= 0: DRAi) 1 
AT XPjVP: SCALE= 1:Q = Q + 

1: IF Q > 7 THEN 2110 
2005 8 = Q + 1: IF B > 7 THEN 211 


2010 IF B = 4 THEN 2005 

Have all aliens change color. 

2020 FOR A = 1 TO 4 

2040 HCOLOR= 0: DRAW 2 AT XiAl.V 

!A) 
2050 FOR L = 100 TO 200 STEP 25: 
tf. TL,5: h T255 - L,5: NEH 

L 
2060 HCOLOfi= Q: DRAW 2 AT X(A),Y 

(A) 
2070 FOR L = 200 TO 100 STEP - 

25: i TL,5! Ic TL + 50,5: NEH 

L 
2080 NEH A: SOTO 2005 

Destruction of planet. 

2110 FOR K = 1 TO 3 

2120 POKE - 16298,0: FOR L = 1 TO 

8: l( T200 - L I 10,3: k T160 

,5: NEH L 
2130 POKE - 16297,0: FOR L = B TO 

1 STEP - 1: It T160 - L » 10 
,5: 6 T100,3: NEXT L 

2140 NEXT K 

Clear Display. 

2150 POKE - 16298,0 

2160 HCOLOR= 0: FOR B = 1 TO 4: DRAW 

2 AT X(B),YfB)! NEXT : SCALE= 
3: DRAW 1 AT XP,YP 

Return to hi-res and display stars. Ask if 
player would like to play again. 

2161 POKE - 16297,0 

2170 IF SC > HS THEN HS = SC: VTAB 
21: HTAB 36 + <HS < 9) + (HS 
< 99) + (HS < 999) t (HS < 
9999): PRINT HS 
2175 VTAB 23: PRINT "DO YOU WANT 

TO" 
2180 VTAB 24: PRINT "PLAY ABAIN? 
";: HTAB 13: FLASH : PRINT 
" "p NORHAL 

Make stars blink and wait for answer. 

2190 IF RND (1) > .5 THEN HCOLOR= 
0: GOTO 2200 



2195 J = INT ( RND (1) * 7 + 1): 

HCOLOft= J + (J = 4) 
2200 K = INT ( RND (1) t 10 + 1) 

: ON K 60T0 2310,2320,2330,2 

340,2350,2360,2370,2380,2390 

,2400 
2310 H = 20: N = 20: 60T0 2450 
2320 HPLOT 50,130: GOTO 2460 
2330 H = 200: N = 145: GOTO 2450 
2340 HPLOT 175,100: SOTO 2460 
2350 H = 120: N = 75: 60T0 2450 
2360 HPLOT 250,40: GOTO 2460 
2370 H = 140:N = 100: SOTO 2450 ^ 
23B0 HPLOT 140,80: GOTO 2460 
2390 H = 45: N = 125: GOTO 2450 
2400 HPLOT 210,90: GOTO 2460 
2450 HPLOT I1,N TO fi + 1,N TO H + 

1,N + 1 TO H,N + 1 TO H,N 
2460 LL = PEEK (KB): POKE KR,0: IF 

LL < 128 THEN 2190 
2480 IF LL = 206 THEN 9999 
2490 IF LL = 217 THEN 2500 
2495 GOTO 2460 

Clear variables for a new game. 

2500 VTAB 22: CALL - 958: SC = 
:C = 1:H = 8:8 = 0:K = 0:Q = 



0:0 = 0:N = 0:R = 0:F = 0:N = 
0:J = 0:A = 0:CC = 0:LL = 0: 
DF = 0:D = 0:L = 0: GOTO 800 


Display title page. Poke in sound routine. 

6000 TEXT : HOME : INVERSE 

6010 FOR A = 6 TO 12 STEP 6: VTAB 

A: HTAB 10: FOR B = 1 TO 22: 
PRINT "»";: NEXT : NEXT : FOR 

A = 7 TO 11; VTAB A; HTAB 10 

: PRINT »t";: HTAB 31: PRINT 

"«■: NEXT 
6020 NORHAL : VTAB 8: HTAB 14: PRINT 

"HASTER BLASTER"; VTAB 10: HTAB 

14: PRINT "BY STEVEN WONG" 
6025 DIM C0(7),X(4),Y(4),P0(4),« 

(4) 
6030 FOR K = 7680 TO 7800: READ 

L:D1 = 01 + L: POKE K,L: NEXT 
6040 IF L OR Dl < > 7671 THEN TEXT 

: HOHE : VTAB 8: PRINT "ERRO 

R! CHECK DATA LINES 7000-702 

2": END 
6050 FOR K = 1 TO 4: READ CO(K), 

PO(K),«(K): NEXT 

continued on page 92 



WHAT ARE YOU WAITING FOR ? ? ? 



Are you tired of waiting for DOS to 
load and save files? Are you tired of 
waiting for DOS to finish so you can 
type again? Are you tired of waiting 
for your printer? When you buy 
Diversi-DOS"^", you won't have to 
wait any more! Here's why: 

1. DOS speed-up: Apple DOS 3.3 
takes 18 disk revolutions to read a 
single track, whereas Diversi-DOS 
reads or writes a track in just 2 
revolutions. This speeds up file pro- 
cessing tremendously (see table). 

2. Keyboard Buffer: Diversi-DOS 
allows you to type at any time, as 
fast as you can, without missing a 
single character. 



APPLE DOS DIVERSI-DOS 

SAVE t 27.1 sec. 5.9 sec. 

LOAD t 19.2 sec. 4.5 sec. 

BSAVE* 13.6 sec. 4.1 sec. 

BLOAD* 9.5 sec. 2.6 sec. 

FEAD** 42.2 sec. 12.4 sec. 

WRITE" 44.6 sec. 14.9 sec. 

" Hi-res screen 1 80-sector BASIC program 
* * 52-sector random access text file 

SoftSide 



3. Print Buffer: Diversi-DOS can use 
a RAM card (16K-128K) to temporari- 
ly save characters before they are 
printed. Thus, your computer won't 
have to wait for your printer to 
finish. 

Diversi-DOS, the TRIPLE utility, re- 
quires a 48K Apple II or [1+ with 
DOS 3.3. A simple, menu-driven In- 
stallation program is included on 
the un-protected disk. So what are 
you waiting for? 

Send $30 to: 

Diversified Software Research, Inc. 
5848 Grampton Gt. 
Rockford, IL61111 
(815)877-1343 

Visa/Mastercard accepted 
Illinois residents add 5% sales tax. 

Apple is a registered TM of Apple Computer, Inc. 
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PROTECT YOUR KEYBOARD 
WITH 

PLEXA-LOK 



• PLEXA-LOK slips up and over the keyboard - then 
gently snaps into position. 

• PLEXA-LOK allows your secretary to go on break 
witlmut having to worry about visitors accidentally 
destroying their hours (and your $) of work. 



APPVE 




PLEXA-LOK 

• ENHANCES looks of your 
system 

• PROTECTS keytxsard from 
dust 

• 3(M>Ar QUARANTtE 

• ALLOWS computer to remain 
on wtiile unattended 

' KEVBOARD protected from 

kkJs 
' HIGH OUAUTY 

Acrytk: 

• SCHOOLS - A MUSTI 



PLEXA-LOK COVERS 



APPLE II 
TRS 80 MOD III 
XEROX 820 
APPLE III 
FROSTY APPLE 



$19.95 
19.95 
24.95 
24.95 
1 .50 extra 



CA Residents Add 6% Tax 

Allow 4-6 Weeks Delivery 

Dealer Inquiries Wekxsme 

MasterCard and Visa Accepted 



I« 



LAST ELECTRONICS 

P.O. BOX 1300S 

SAN ANDREAS, CA 95249 

(209) 754-1800 

Introductory Special - Prepaid UPS, Continental USA 



MOVING? 



If you're planning to move, please 
let us know at least six weeks in 
advance. This will help us to 
change your address insuring you 
with prompt and accurate service 
on your subscription. Attach your 
current mailing label filling in your 
name and NEW address in the 
space provided. 



Attach 

old label 

here 



_Zlp_ 



Name __^ 

New Address 

City State_ 



Send old label with your name and 
NEW address to: 

SoftSide 

100 Pine Street 

Holmes, PA 19043 
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6070 POKE 232,0: POKE 233,30 

6080 A* = "201,084,208,015,032,17 
7,000,032,248,230,138,072,03 
2,183,000,201,044,240,003,07 
6,201,222,032,177,000,032,24 
8,230,104,134,003,134,001,13 
3,000" 

6090 FOR K = 1 TO 35: POKE K + 7 
67, VAL ( HID* (A$,K t 4 - 3 
,K « 4 - U): NEXT 

6100 A$ = "170, 160,00!, 132,002, 17 
3,048,192,136,208,004,198,00 
1,240,007,202,208,246,166,00 
0,208,239,165,003,133,001,19 
8,002,208,241,096" 

6110 FOR K = 1 TO 33: POKE K + 8 
02, VAL ( HIDt fAt,K t 4 - 3 
,K » 4 - D): NEXT 

6120 POKE 1013,76: POKE 1014,0: POKE 
1015,3 

Initialize variables. 

6125 ZO = 255 

6130 KB = - 16384: KR = - 16368 

6140 PO = - 162B6:P1 = - 16287 

6150 FB = 127:H = 8:C = 1 

6155 Z4 = 259: Z5 = 143 

6160 VTAB 22: HTAB 9: PRIHT "< H 

IT ANY KEY TO BEBIN >" 
6170 A = PEEK (KB): IF A > 127 THEN 

POKE KR,0: TEXT : HOHE : RETURN 
6180 H = INT ! RND il) t 100 + 1 

50): & TI1,8: FOR PA = 1 TO 1 

00: NEXT PA: BOTO 6170 

Shape table data. 

7000 DATA 2,0,6,0,17,0,59,63,72, 
9,100,146,45,213,219,54,0,35 
,63,54,54,45,36,76,44,53,54, 
62,39,228,192,193,57,63,63,5 
4,62,62,63,36,39,36 

7010 DATA 37,63,55,53,54,46,54,4 
5,45,48,46,192,193,49,54,54, 
46,46,45,45,45,37,37,36,36,1 
48,42,36,45,37,44,36,60,44,4 
5 

7020 DATA 62,54,54,55,62,63,39,6 
0,36,60,63,63,60,63,55,44,44 
,45,45,53,53,60,63,39,60,55, 
44,45,53,63,36,36,39,45,190, 
146,146,146,146,218,53,45,44 
,0 

7050 DATA 1,13,152,2,83,154,3,15 
2,156,5,222,158 

SoftSide 



Set graphics. Draw stars and walls. 



8000 



8005 
8007 
8008 

8010 

8020 



8025 

8030 

8035 
8036 



8038 



8040 



H6R : FOR K = 1 TO lOOsH = 

RND U) I Z4 t 5:N = RND ( 
1) t Z5 + 5:0 = RND (1) » 7 

+ 1: HCOLOR= - (0 = 4): HPLOT 
H,N: NEXT 

ROT= 

FOR E = 152 TO 156 STEP 2 
K = INT ( RND il) t 7 + U: 

IF K = 4 THEN 8008 

HCOLOR= K: HPLOT 0,E TO 279 
,E: NEXT 

FOR F = 1 TO 4:X(F) = INT 
< RND (1) t 46 + PO(F)):Y(F) 

= 5 t F: NEXT 

COLOR= INT ( RND U) t 14 + 
1) 

FOR K = TO 39: HLIN 0,39 AT 
K: NEXT 

POKE - 16297,0 

FOR K = 1 TO 3: FOR L = 100 

TO 1 STEP - 3: i TL,4: NEXT 
: FOR L = 1 TO 100 STEP 3: i 
TL,4: NEXT : NEXT 

VTAB 21: HTAB 1: PRINT "SCO 
RE: 00000": IF NOT HS THEN 

VTAB 21: HTAB 26: PRINT "HI 

SCORE: 00000" i 

BOTO 160 



End of program. 

9999 TEXT : HOHE : VTAB 10: PRINT 
"HE'LL BE BACK!!!" 

10000 IF PEEK !KB) > 127 THEN 1 
0100 

10010 60T0 10000 

10100 POKE KR,0: HOME : END © 



APPLE™ SWAT TABLE FOR: 


MASTER BLASTER 






SWAT 




LINES 


CODE 


LENGTH 


10 - 120 


LV 


493 


122 - 220 


AE 


271 


230 - 1100 


ON 


243 


1110 - 2110 


SO 


263 


2120 - 2200 


6H 


418 


2310 - 2460 


PV 


262 


2480 - 6070 


JB 


457 


6080 - 6160 


YZ 


530 


6170 - 7050 


DI 


511 


8000 - 8040 


FL 


357 


9999 - 10100 


FV 


78 



FORTRESS 



by Ronald Azuma 



Fortress Is an arcade^style game program for an Apple^'^ 
with Applesoft, 4gK RAM, and a disk drive. A joystick is 
optional. It is included as tlie bonus program on the issue 
36 Apple DV. See the Bind-in Card elsewhere in this issue 
to order this month's disk. 

Earth is under attack. 
You are the commander 
of the last surviving Star 
Fortress in the Mars 
defense line. Your Star 
Fortress is armed with 
four laser cannons, one 
for each compass direc- 
tion, and each capable of 
annihilating any enemy 
ship with a single shot. 
In addition, you have a 
limited amount of Smart 
Bombs that destroy 
everything on the screen. 
The enemy is a for- 
midable opponent. He 
will attack in "waves," 
fire his nuclear missiles 
at you, and leave the 
screen. If one of his 
missiles hits your Star 
Fortress, you will be 
destroyed. Later in the 
game, the enemy gets 
faster ships (Wave 4, 
green ships) and faster missiles (Wave 7, purple ships). 

To play Fortress, run FORTRESS HELLO. The pro- 
gram initially places you in the demo mode. When you are 
ready to play, hit RETURN. You can use either the 
keyboard or a joystick to play the game. If you want 
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keyboard control, use the I-J-K-M keys for firing the 
lasers, and the space bar for using a Smart Bomb. For 
those of you who are not familiar with the I-J-K-M pat- 
tern, I will fire up, J will fire left, K will fire right, and M 
will fire down. If you prefer using a joystick, pushing the 

stick in the correct direc- 
tion will fire the lasers, 
while pushing button Q 
will activate a Smart 
Bomb. It would be wise 
to adjust the joystick 
before playing the game, 
so that the program can 
adapt to your particular 
joystick. (The program is 
initially set for a TG 
Super Joystick.) 

You start with two 
Smart Bombs and a 
limited supply of laser 
charges. If you use up all 
of your charges, your 
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lasers will be useless. 
You receive an extra 
Smart Bomb every 5000 
points. The number of 
asterisks in the upper 
left-hand corner of the 
text screen indicates how 
many Smart Bombs re- 
main. You get points for 
each ship destroyed and for each laser charge remaining at 
the end of each attack wave. The game ends when your 
Fortress is destroyed. The program saves the top ten 
scores, so keep your disk in the drive! 

Good luck. Commander! Mankind is depending on you! 

Q 
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v. Heartland Software 
^^ 1983 Specials 




We Stock 

Broderbund APX 

Synapse PDI 

Avalon Hill J V Software 

On-Line Strategic Simulations 

Datasoft Automated Simulations 

Big-Five Adventure Intex-national 

Sirius New Games Arriving Kverv Davl 
Call For Information 

tappkz AATARI TRI-80 




Title 


List 


Our Price 


Title 


List 


Our Price 


Title 


List 


Our Price 


Action Quest 


?9.95 


23.95 


Frogger 


34.95 


25.95 


Ricochet 


19.95 


15.95 


Arluenture 12-Pack 


129.95 


100.00 


Galaxy Invasion 


15.95 


12.95 


S.A.G.A. 1-12 


39.95 


29.95 ca. 


Andromeda Conquest 


23.00 


18.95 


Genetic Drift 


29.95 


23.95 


Sammy The Sea Serpent 


16.95 


13.95 


Apple Panic 


29.95 


23.95 


Graphics Composer 


39.95 


29.95 


Scarfman 


1995 


15.95 


B'l Nuclear Bomber 


16.00 


12.95 


Ghost Encounter 


29,95 


23.95 


Serpentine 


34.95 


27.95 


Battle of Shiloh 


39.95 


29.95 


Invasion Orion 


24.95 


18-95 


Sea Fox 


29.95 


23.95 


Claim Jumper 


34.95 


27.95 


K^Razy Shootout 


49.95 


37.95 


Shamus 


34.95 


27.95 


Commbat 


24.95 


19.95 


Labyrinth 


29.95 


23.95 


Shooting Arcade 


29.95 


23.95 


Convoy Raider 


16.00 


12.95 


Legionnaire 


35.00 


27.95 


Slime 


34,95 


27.95 


Cosmic Balance 


39.95 


29.95 


Micropamter 


34.95 


27.95 


Softporn Adventure 


29.95 


23.95 


Crossfire 


29.95 


23.95 


Mission: Asteroid 


24.95 


18.95 


Space Eggs 


29.95 


23.95 


Curse of Ra 


19.95 


15.95 


Moon Base ID 


29.95 


23.95 


Star Blazer 


31.95 


24.95 


Cycl()d 


29.95 


23.95 


Morloc's Tower 


19.95 


15.95 


Star Warrior 


39.95 


29.95 


Datestones of Ryn 


19.95 


15.95 


Mouse kattack 


34.95 


27.95 


Stellar Escort 


15.95 


12.95 


Deadly Secrets 


34.95 


27.95 


Midway Campaign 


16.00 


12,95 


Stellar Shuttle 


29.95 


23.95 


Deadline 


49.95 


37.95 


Nautilus 


34.95 


27.95 


Super Nova 


15.95 


12.95 


Defense Command 


15.95 


12.95 


OK Galaxy 


20.00 


14.95 


Tanktics 


24.00 


18.95 


Dnieper River Line 


30.00 


24.95 


Pacific Coast Hwy 


29.95 


23.95 


Temple Of Apshai 


39.95 


29.95 


Dodge Racer 


. 34.95 


27.95 


Protector 


34.95 


27.95 


Text Wizard 


99.95 


75,95 


Dog Daze 


22.95 


19.95 


Preppie 


29.95 


23.95 


Tigers In The Snow 


39.95 


29.95 


Eastern Front 


29.95 


23.95 


Reptilian 


34.95 


27.95 


Track Attack 


29.95 


23.96 


fort Apocalypse 


34.95 


27.95 


Rescue At Rigel 


29.95 


23.95 


Visicalc 


250.00 


19995 
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CD 



Inciicate type of computer, disk or cassette. 

For fast delivery, send Certified Check 

or Money Order. 

Personal checks require two weeks to process. 

C.O.D. orders add $1.50. 

Master Charge or Visa orders add 3'Ki 

(Include all embossed information on card) 

Add $2.00 shipping and handling. 



I'rices .subject to fhangf. 



.Make Chc-cks and .Vlonev Orders payable l,o: 
HEARTLAND SOFTWARE DISTR. 
P.O. Box 25517 
Cleveland, Ohio 44125 

Ohio Residents add 6.5'Ki Tax 
(216) 641-5055 

Order Lines Open 10 a.m. - 9:00 p.m. Mon.-Fri. 
Noon - 6:00 p.m. Sat. 



Send $1.00 for complete catalog 



Apple IS a Registered Trademark of Apple Computer. 
TRS-80 IS a Registered Trademark of the Radio 5 



Atari IS a Registered Trademark of Atari !nc 
T of Tandy Corporation 
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Reviewed by Gary W. Bradley 



by Paul Lutus (Insoft, 10175 
Southwest Barbur Blvd., Suite 
202B, Portland, OR 97219). System 
requirements: 48K Apple II™ or 
Apple II Plus, Language Card op- 
tional. Suggested retail price: 
$75.00. 

Sometime ago, I read about a 
fellow who wrote a word processor 
for the Apple II, working in a cabin 
in the woods of Oregon, with power 
supplied by a 1300-foot extension 
cord. As it turns out, the word pro- 
cessor was the best-selling Apple 
Writer, and the fellow was Paul 
Lutus. This same man is the author 
of a number of other successful pro- 
grams for both the Apple II and the 
Apple III. 

His name started popping up in 
ads in several magazines, selling a 
language called TRANSFORTH. 
Recently, SoftSide published a 
review of Electric Duet {May, 1982), 
which produces two musical voices 
simultaneously through the Apple 
speaker. The program was written 
by — you guessed it, Paul Lutus! 

During the month or so I spent 
working with ALD System II, for 
the purpose of this review, an article 
appeared in the Wall Street Journal 
about a "mountain hermit," who 
programs computers. Paul Lutus 
again! 

Part of the publicity stems from 
the fact that Mr. Lutus is an in- 
teresting personality. Beyond that, 
from everything I've read and seen 
about his creations, this much is 
clear: Paul Lutus is an exceptionally 
efficient and proficient program- 
mer, and we Apple users are for- 
tunate to have him working for us. 
It's easy to see why 1 had high ex- 
pectations for ALD System II. 

ALD (Assembly Language 
Development) System II is an 
enhancement of ALDS I, also a 
Lutus production, which is 
marketed by Hayden Book Com- 
pany. ALD System II is compatible 
with ALDS I, in that source files 





created on the eariier system can be 
converted easily to System II by 
following step-by-step instructions 
given in the manual. 

For those who know nothing 
about assembly language, let me ex- 
plain. Assembly language is the way 
Machine Language programs are 
written. Machine Language for the 
6502 microprocessor consists of in- 
structions which occupy one to three 
bytes of memory each, and are ex- 
ecuted directly by the micro- 
processor. Everything your Apple 
does is uhimately done in Machine 
Language, regardless of what com- 
puter language you are 
using. 

Machine Language programs are, 
for all intents and purposes, 
unintelligible to human beings. An 
assembler is a program which allows 
people to represent the cryptic 
Machine Language instructions by 
three-letter mnemonic codes, 
numeric operands, and symbolic 
labels. Programs written in this 
form are then translated into the 
Machine Language form by the 
assembler. There are several dif- 
ferent assemblers for the Apple on 
the market. About the only com- 
mon feature is the set of mnemonic 
codes, defined by the designers of 
the microprocessor. If you want to 
learn to write Machine Language 
programs, you should talk to people 
who know about assembly language 
and can show you the features of the 
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various assemblers available. Com- 
pare these features to the ones 
described in this review to determine 
which assembler you should buy. 
ALD System II should definitely be 
a candidate. 

ALD System II consists of the 
two essential elements of an 
assembly language system, an editor 
and an assembler. Both are resident 
in RAM at the same time. This 
means that you can go back and 
forth between them instantly 
without loading anything from the 
disk. This is one of many features of 
ALD System II which contribute to 
its speed. The editor is used to create 
the source file, the one readable by 
people. The Machine Language file 
created by the assembler is called the 
object file. 

The ALD System II editor is 
cursor-based. The cursor always ap- 
pears between two adjacent 
characters in the source file. If you 
are accustomed to a line editor, this 
will take some getting used to, but 
the advantages of this editor quickly 
become apparent. Normally, the 
cursor is the famiUar blinking white 
block. Hit the ESC key once, and it 
becomes a blinking up-arrow, which 
means that any character you type 
will be an inverse character. Hit the 
ESC key again, and the cursor is a 
blinking plus sign, which allows you 
to position the cursor within the file. 

continued page 91 
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YOU'VE JUST FOUND 

THE MISSING LINK! 



g 



$1.50 .— 

■CSmVPUTBR SHaptPBR 

The Nationwide Marketplace for Computer Equipment 



March 15, 1982 



jlOpwyMT 




IMX-80 RIBBONS S3.95- 




Computer Shopper is your link to 
individuals who buy, sell and trade 
computer equipment and software 
among themselves nationwide. No 
other magazine fills this void in the 
marketplace chain. 

Thousands of cost-conscious com- 
puter enthusiasts save by shopping 
in Computer Shopper every month 
through hundreds of classified ads. 
And new equipment advertisers offer 
some of the lowest prices in the nation. 

Computer Shopper's unbiased 
articles make for some unique 
reading among magazines and 
there's a "help" column to answer 
difficult problems you may have with 
interfacing, etc. 



For a limited time you can subscribe 
to Computer Shopper with a 6 
month trial for $6 or 12 months for 
$10. 

You risk nothing, because if you're 
not 100% satisfied after receiving 
the first issue, you may cancel and 
receive a full refund. No questions 
asked! 

If you want faster service, call in 
your subscription and charge on 
your MasterCard or VISA account. 

Our business office is open from 
8 a.m. to 5 p.m. Monday through 
Friday. Call for charge card orders 
or send your check or money order 
TODAY while the offer is still good. 



6 month trial p^6 or 12 months for ^10 



irompu I SR shlup^psr 



P.O. Box F-704 • Titusville, FL 32780 
305-269-3211 
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The I, J, K, and M keys move the 
cursor up, left, right and down, one 
line for each keypress. Pressing any 
other key brings back the normal 
cursor and allows you to continue 
editing. 

The editor includes an amazingly 
fast string locating and replacement 
feature, invoked by CTRL-S. You 
can also instantaneously position 
the cursor at the beginning or the 
end of the file with CTRL-B and 
CTRL-E. Other CTRL key func- 
tions make it simple to delete words 
or lines, and give you an alternative 
method for entering inverse char- 
acters. Still others allow you to save 
portions of your source file to the 
disk, insert saved portions into your 
source file, display the amount of 
editor memory remaining, and 
directly access DOS commands. 

Although the editor is not a line 
editor, line numbers are recognized, 
but not shown. If an error is flagged 
during assembly, a line number is 
given, and when you return to the 
editor you can jump directly to that 



line in the source file by using 
CTRL-J and entering the line 
number. 

Characters are erased from your 
source file by using the left-arrow 
key to backspace over them. A 
256-byte input buffer is maintained, 
and characters you delete in this 
fashion are stored in this buffer on a 
last-in, first-out basis. These 
characters are retrieved by using the 
right-arrow key. This is a tremen- 
dously useful feature of the editor. 
You can move a portion of your file 
to any other place in the file by posi- 
tioning the cursor at the end of the 
portion you want to move, back- 
spacing through the characters, 
moving the cursor to the new posi- 
tion, and using the right-arrow key 
to retype the characters you just 
deleted — simple. 

The only thing about the editor 
which could cause a problem is that, 
every once in a while, the cursor 
moves below the portion of the file 
that is visible on the screen. This 
happens when you are in the "blink- 
ing plus sign" mode, and are using 
the M key to jump the cursor for- 



ward in the file. The cursor always 
reappears on the next keypress, 
however, and your editing capabil- 
ities are not adversely affected. It's 
just a little disquieting the first time 
it happens. 

The editor supports the conven- 
tional fields used in assembly 
language; one each for the label, 
operator, operand and comment. 
The editor tabs to the next field each 
time you use the space bar. Thus, it 
requires only one byte in your 
source file for each time you tab to 
the next field in a line. The space 
between the operator and the 
operand is not required, but the 
amount of memory saved by not us- 
ing it is insignificant, compared to 
the loss of readability in your source 
listing. Comments are always 
preceded by a semicolon, and may 
appear anywhere they are needed; 
i.e., you may insert pure comment 
lines at any place you want them in 
your source file. The semicolon 
disables the automatic tab feature, 
so that your comments appear 
correctly. 

continued on page 98 



NOW YOU CAN MIX BUSINESS AND PLEASURE ... THE 
ATR8000 AND THE ATARI® 800/400 GIVE YOU GREAT GAMES 
AND A VIABLE DOUBLE DENSITY BUSINESS COMPUTER. 



The ATR8000 converts the ATARI 800/400 into an expandable 4MHz ZBO double density 
business machine. Add the 64K upgrade (includes CP/M) and step into a further 
dimension as you enter the vast CP/M market place to select programs tailored to 
your specific needs. 

The ATR8000 is versatile, so it can grow as you need it to. Its handling of disk drives 
is revolutionary ... it runs four 5y4" or 8" drives, single or double or quad density, single 
or double-sided AND allows you to mix them! 

SPECS: 4MHz Z80 processor • 16k RAM standard • Connects 
to expansion port of the ATARI 800/400 • MVz" x ^V/2" x aVa" 
gray and beige enclosure • Runs four drives of mixed definition 

• Centronics parallel and RS-232 serial port (and printer drivers) 

• Runs single density ATARI DOS and existing ATARI software 

• With OSA+, Ver. 4, is double density • 64K upgrade includes 
CP/M. 




PRICING: 


ATR8000 


$499.95 


OSA+, Ver. 4 


$49.95 




SVi" Drive 


$399.95 


Pririter Cable 


$29.00 




64K Upgrade 




5Vi" Drive Cable 


$35.00 




(with CP/M) 


$250.00 


8" Drive Adapter 


— CALL- 



B 



CONTACT: SOFTWARE PUBLISHERS, INC. 

2500 E. Randol Mill Rd., Suite 125 
Arlington, TX 76011 817-469-1181 

ATARI is a registered trademarl< of ATARI, Inc. CP/M is a registered trademarl< of Digital Researcfi. Inc. 
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EDUCATIONAL 
ACTIVmB, INC. 

Teacher Authored Programs 

Classroom and Home 
for TRS-80, APPLE II, PET 



MATH • LANGUAGE ARTS 

READING • SPELLING 
LITERACY •PROGRAMMING 



EASY TO USE 

TUTORIAL & PRACTICE 
USEFUL FOR ALL AGES 

FULL COMPUTER CAPABILITIES 
EDUCATIONALLY SOUND 

REMEDIAL & DEVELOPMENTAL 

Send for FREE complete microcomputer 
software catalog. 
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EDUCATIONAL ACTIVITIES, INC. 

P.O. Box 87, Baldwin, New York 11510 

(516) 223-4666 

CALL TOLL FREE OUTSIDE N.Y. STATE 

800-645-3739 

IN CANADA 

CORONET INSTRUCTIONAL MEDIA, Ltd. 

200 Steelcase Road EasI 

Markham, Ontario L3R 1G2 




COLOR SLIDES 
FROM YOUR APPLE* 



W 



m 



SLIDE EXPRESS 



Turns your Apple II* 

HI Res Graphics 

into 35mm Color Slides 

Have slides made from: 

• Apple Business Graphics* 

• Executive Briefing System + 

• Visiplot* 

• Ottier 33 or 34 Sector 
Binary Picture Files 

Slides for 
• Meetings • Conferences 

• Lectures • Trade Shows 
for only $6.00 per slide 

($30.00 minimum) 

Turnabout Time - 5 Days 

For information call or write: 

VISUAL HORIZONS 

180 Metro Park, Roctiester, NY 14623 

(716)424-5300 



"Trademarks of Apple Computer Corp tTrademark of Lotus 
Corp tTrademark of Personal Computer, fnc Computer 
Slide Express fs a trademark of Vtsuaf Horizons. Inc 
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The assembler supports all of the 
standard 6502 opcode mnemonics. 
Only one nonstandard mnemonic is 
used, the GLB operator. It allows 
the simple construction of two-byte 
address tables, commonly used as 
branch destinations for instructions 
using one of the 6502's indexed ad- 
dressing modes. 

If you've used an assembler with 
its own set of nonstandard 
mnemonics for various assembler 
functions, you may wonder how 
you'll get along without them. It's 
easy. Most notably, the use of a 
nonstandard mnemonic for equates 
has been replaced by a simpler and 
more natural procedure. You just 
enter the label you wish to assign, 
tab to the operator field, and enter 
an equals sign followed by the con- 
stant the label will represent. 
Character strings are defined using 
this same simple method — enclos- 
ing the desired string in quotes. 

A set of thirteen system operators 
handles other assembler functions. 
These require the "@" sign 
(SHIFT-P) as a prefix, and appear 
in the label field. With these 
operators, you can select the address 
at which the object file will be 
created, the address at which it will 
run, the amount of memory set 
aside for the assembler symbol 
table, several printing options, or a 
file to be inserted or appended dur- 
ing assembly, to name just a few of 
the available options. 

Constants in ALD System 11 are 
all entered in hexadecimal form. 
Even when an assembler allows me 
to enter constants in hex, decimal, 
octal, base 87, etc., I never use 
anything but hex, because it's the 
natural form for 6502 instructions. 
The advantages gained by doing 
away with alternative numbering 
systems are a savings in the length of 
the assembler program itself, and 
the elimination of the need to prefix 
hex numbers with a dollar sign. It's 
acceptable to the assembler if you 
feel compelled to use the dollar sign, 
and it is required when specifying a 
zero-page constant operand in order 
to prevent the assembler from inter- 
preting it as a two-byte address. 

Paul Lutus has some strong opin- 
ions about computer language struc- 
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ture, and the ALD System 11 
assembler reflects these feelings. It 
uses a three-level-hierarchy of labels 
— local, global and universal. 
Universal and global labels are 
designated by "&" and "*" 
prefixes, and local labels have no 
special prefix. During assembly, the 
lower-level labels are sought only 
between the first next higher-level 
labels appearing before and after 
the current statement. This creates 
distinct program segments, allowing 
you to use simple labels, such as 
LOOP, NEXT, BRANCH, HERE, 
THERE, etc., over and over again 
within a program, provided that 
each is unique within the program 
segment to which it belongs. 

This structural form, along with 
the capabilities for saving, recalling, 
inserting and concatenating source 
files and source file segments, give 
the assembly language programmer 
tremendous advantages. With ALD 
System II, it is simple to create an 
extensive library of assembly 
language routines, and to insert 
them in programs or string them 
together at will, without concern 
over label conflicts or file 
compatibility. 

The other point on which Lutus is 
a real stickler is user-friendliness. 
ALD System II demonstrates this, 
as well, with fast, simple menus and 
commands, making the operation of 
a lot of other software appear to be 
just so much red tape. If you've ever 
been driven to distraction by the in- 
cessant standard Apple "beep," 
which most programs use to get 
your attention, you'll be pleased to 
know that it is totally absent from 
this system. I won't tell you any 
more about this, so that you can be 
as pleasantly surprised as I was on 
my first venture into ALD System 
IL 

For easy identification, by the 
editor, the assembler and you, 
source file names are given the 
prefix "SRC", and object files, the 
prefix "OBJ.". This is all done 
automatically by the software; you 
can ignore it while using the system. 
Just assign a name that's mean- 
ingful to you. Additionally, each 
time you are asked to provide a file 
name, the one most recently entered 
is displayed, so you can use it again 
if you want to. Just use the right- 
arrow and REPT keys to retype the 
name. It's just as easy to change a 
few characters in the file name, to 
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update a version number, for exam- 
ple, or to enter a brand new file 
name. The proper file name prefix is 
automatically attached, or searched 
for, depending on the context of 
your situation. 

Another important part of user- 
friendliness is the manual, and this 
one is excellent. First, you're given a 
description of the system and its 
capabilities. Then you're told that 
the manual will not teach you 
assembly language programming; it 
would be unreasonable to expect 
that it should. So much for page 
one. 

The rest of the manual is designed 
to be used as a reference. I like that. 
There is very little material of a 
tutorial nature, although examples 
are given where necessary. I under- 
stand that Lutus believes a good 
piece of software should not require 
a manual at all. This package comes 
as close to meeting this requirement 
as I believe an assembler could, due 
to the special nature of such a 
system. After you master the 
features you'll use most frequently, 
you will seldom refer to the manual. 
When you need a feature that you 
don't often use, it is easily found 
and clearly explained. 

I read through the entire manual 
twice (only 32 pages long) before I 
put the disk into my drive, to get a 
general feel for how the system 
worked. I'm not sure this was ab- 
solutely necessary, but it was 
helpful. By doing so, I learned that 
a short sample program was located 
on page 23, with complete instruc- 
tions for entering and assembUng it. 
If you've ever used an assembler, 
this example is all you need to start 
writing your own programs. 

Paul Lutus has a reputation for 
being somewhat adamant about his 
opinions on the way things should 
work, and authors like to point out 
that he has ruffled some feathers 
because of this. A couple of 
statements in the otherwise 
straightforward and matter-of-fact 
style of the manual stood out as ap- 
parent attempts by Lutus to get in a 
couple of editorial licks. I'll give 
two examples. 

Lutus has expressed a distaste for 
BASIC, and in the manual he refers 
to it as a "dinosaur language." At 
another point, he says that Apple 
DOS could have included one of the 
features of ALD System II's file- 



handling capabilities, adding sar- 
castically, "...but that would have 
required DOS to have been written 
competently." At first, I interpreted 
such statements as arrogance, but in 
time I came to view them as a source 
of amusement. Besides, if arrogance 
is ever justifiable, it can only be 
justified by truly superior ability 
on the part of the writer. Mr. 
Lutus has amply demonstrated such 
ability. 

I'll comment on the DOS feature 
without taking sides on the issue 
Lutus raises. The statement was 
made in reference to the fact that 
ALD System II reads text files via a 
"speed-reader," both when loading 
and assembling the files for the 
editor. This is not a unique ac- 
complishment. Other software ven- 
dors have used similar routines to 
make their programs load more 
quickly. However, it is an important 
feature of ALD System II. When 
assembling long source files, much 
of your time is spent waiting. A lot 
of time can be wasted, because even 
a one-character change in your pro- 
gram requires you to go through the 
entire assembly process. 

Although this is not intended to 
be a comparative review, I did 
assemble a fairly lengthy source file 
on both ALD System //and another 
assembler that reads text files in the 
normal DOS manner. Total assem- 
bly time (without a printout) with 
ALD System II was less than h"'f 
the time required by the ot.. - 
assembler — impressive. 

There's no denying that ALD 
System II is an excellent assembler 
for the Apple. I would have ex- 
pected no less from one of the most 
capable and successful Apple pro- 
grammers. The major innovation is 
the relatively high degree of pro- 
gram structure the system allows. 
This, along with the extensive file 
management features, makes the 
system suitable for the creation of 
virtually any conceivable piece of 
Machine Language software. The 
user has great flexibility and control 
over the utilization of memory dur- 
ing editing and assembly. The 
system bears the Lutus hallmark of 
compactness, ease of use, and 
speed. If you're considering the pur- 
chase of your first assembler, or 
think you might do better than one 
you're already using, take a good 
look at this one. © 



• FREE SHIPPING * 

Within Continental 48 States 




SOFTWARE FOR THE TRS80 

MAXI CRAS Mod l/lil $84.95 

LAZYWRITER Mod I/Ill $159.95 

NEW SCRIPT 7.0 Mod I or III $114.95 

LDOS -Ver. 5.1 Mod I or III $114.95 

DOSPLUS - 3.4S/3.4D/3.4III $119.95 

MULTIDOS - Improved Version . . . $89.95 
GEAP . $42.95 - W/Dot Writer 1 .5 $89.95 

SUPERUTILITY + W/Backup $59.95 

MZAL - Ver. 2 Mod I or III $134.95 



VOICE BOX by Alien Group 
ATARI ■ Tape or Disk (Specify) . . . $149.95 
APPLE - with Firmware, Rom .... $189.95 
APPLE -without Firmware. $119.95 



MICROSOFT - For The Apple 

SOFTCARD $349.95 

RAMCARD $174.95 

SOFTCARD PREMIUM SYSTEM . $674.95 

Includes Softcard, Ramcard, & Videx Videoterm 80 Col. 

FORTRAN 80 - Req. Softcard . . . $1.74.95 
A.L.D.S. - Reg. Softcard $114.95 



MODEMS 

SIGNALMAN for Atari $94.95 

LYNX- For TRS80 Mdl I/Ill $239.95 

HAYES MICRO MODEM II $334.95 



MICROBUFFER ■ Pract. Periph. 
Parallel or Serial (Epson) $149.95 



LNW-Doubler 5/8 

Includes Dosplus 3.4D$205.95 
LNW EXPANSION II - S375.00 



RIBBONS 



ZIP BOX RELOADS % Dz. Dz. 

Epson MX 70/80-20 Yds 24.00 42.00 

Epson MX 100-30 Yds 30.00 52.00 

NEC/Prowriter 21.00 36.00 

Centronics 730/737/739/779 or 

LP- l/ll/IV-16 Yds 18.00 3Z00 

All ZIP BOXES are individually sealed black nylon 
and require no rewinding. 

CARTRIDGES Each Dozen 

Epson MX 70/80 8.95 90.00 

LP-IIIA/ 6.50 70.00 

Centronic 702/03/04/53 11.00 120.00 

RS DSY WHL II Muiti strike 6.50 70.00 

Diablo Hytpe II Mum strike 6.50 70.00 

Qume-300,000 chr muiii strike . . . 6.50 70.00 
Nee SRI N H- Yield Muiti strike .... 7.00 75.00 

MCRLNE 80/82A/83A Spl N/A 24.00 

Minimum order 3 cartridges - any mix. For smaller 
quantities add $1.50 per order. All our reloads and 
cartridges are manufactured by one of tfie oldest and 
most reputable ribbon Mfg's. in tfie country. 

* * * ♦ ♦QUALITY GUARANTEED* ♦ * ♦ * 



ORDERING INFORMATION 

No credit cards at these low prices. Add $2.00 on all 
COD orders. Certified Ck/MO/COD sfiipped immedi- 
ately. Please allow 2 weeks for personal cfiecks. For 
extra fast service pftone in your COD order. Free ship- 
ping within Continental 48 states via UPS ground. For 
Canada, Hawaii, Alaska, applicable shipping and In 
surance charges apply. Prices subject to change with- 
out notice. New York State residents please add 
appropriate sates tax. 

The items listed above are a cross-section of our 
product line. We carrythe full line of most companies 
listed in the ad, plus much more. SEND FOR YOUR 
FREE CATALOG. 



146-03 25th Road, Dept.S 
Flushing, New York 1 1 354 



MonFri (212)445-7124 

10AM-9PM 



Sat. 
10AM-5PM 



SoftSide 



99 




TRS-80 






<g> 



I I 



s 



by Bruce Forstall 
S&w and David Henderson 



i 



Space Fire is an arcade style game for the TRS-80® 
Model I/III with 16K RAM. 

The object of Space Fire is to shoot the maximum 
number of invading space ships with a limited number of 
steerable missiles. You start with fifteen missiles to shoot 
the space intruders. The base where the missiles originate is 
in the bottom center of the screen. On the left side of the 
base is a message telling you how many ships you have hit. 
On the right side of the base is a message telling you how 
many points you have scored. 

The intruders' ships move from the left side of the screen 
to the right side, except for the second ship, which moves 
from right to left. There will always be four ships on the 
screen at one time. Each ship moves at a randomly-deter- 
mined speed which ranges from 1 to 5. The number of 
points scored for each ship is equal to the speed, so go for 
the fast ones to get the best score. 

When the program starts, it spends a few seconds setting 
up the sound routine. The screen is then drawn and the 
game begins. 

Missiles are fired and controlled by pressing the follow- 
ing keys: 

spacebar — straight up 

left arrow or Z — left and up 
right arrow or / — right and up 



You may control the path of your missile with these keys 
after it has been fired. If you are very good, you can get all 
four ships on the screen with one shot. 

When the game is over, a tally will be printed showing 
how many ships you hit, and your final score. 



Variables 

A$(*): First ship's design. 

B${*): Second ship's design. 

C$(*): Third ship's design. 

D$(*): Fourth ship's design. 

D$: String of remaining missiles. 

1$; "Y/N" input string. 

X$: Player's missile base. 

A1-A4: Positions of ships. 1 = top ship, 4 = bottom 

ship. 

B1-B4: Speed of ships, 1 = top ship, 4 = bottom ship. 

F: Missile direction fiag. 1 = left and up, 2 = right and 

up, 3 = straight up. 

F9: Flag which indicates which ship to print. 

HI: High score from current run. 

S: Position of player's missile. 

SC: Player's score. 

SH: Number of ships hit. 
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TRS-eO BASIC 
'SPACE FIRE' 
AUTHORS: 9RUCE PSRSTflLL 
ftNO OftVID HENDERSON 
C0PYRI6HT (C) !'J82 
SS SOFTSICE PUBLICATIONS, INC SS 
SS SS 

SS SS SS SS SS SS SS SS SS SS SS 

If you don't wish to type this program, it is also 
included on this month's SoftSide CV and DV. 

Set up the sound routine (November, 1981 SoftSide) 

10 2=0:F0PMTfll58;READV:I=ZtY:NEn:IFIO!5204THENCLS:PRIKT"0ATB 
BASE ERROR IN LINES 70-170, CHECK LISTING. ■:FRINT:LIST70-170£LS 
Elf=afc!l(=255:P0KE-l,O;IFPEEKf-li<:>0TH£N<=191:PaKE-l6;5B,0:lFPEEK( 
-143851-: ^OTHENU 127 

2P P0kEl4562,K;POm5561,f:CLEAPB0;ftl=PEEK'li541)+2iA:=PE£K(i456 
2):fl-Al+fl2»256!Z=A'l;F0a)(=lT0158:I=2tl;I-7t65536t[:>32767l 
30 PEADV:IFYfOTHENV=fll*ABSfY):PD>:EZ,yt256I(y>255);:=Z+l:P0KEZ,A2 
-lV^255l!NEn£LSEP0tEI,V;NEl(T 

40 IFPEEK(i4396)=2f)lPaKEli52i,fil:P0KE14527,A2EL3ECHI}"T':DEFUSR=fi 
lt(A2+254llfl2>127))»254:POKEH50B,0 
50 IFPEEK( 16807? tPEEM 16608! »25t<\A+24THENA=lJSR(0> 
bO SOUND n,u 

70 DATA5S,l44,65,50,-t64,42,167,t5,34,-165,d2.1?5,50 
80 DATA16i, t5,33, -24. 34, 147, 65. 201 , 245. 1 23, 254, 2 , 40 , 4. 254 
90 PATA!4,32,7?,22<;,213,42,:30.64.126,183.32.4,3S,35,35,35 
too DATA215. 4, 5. 17, -154, 24, 190,32, 104, l<f, 15, 14. 248, 43, 215 
110 DATfl*3, 34, 230,44, 241, 241. 241, 241, 197, 213,215, 205, 55,35 
120 DATA229, 205. 127, 10, 42, ■3.45,34,-147, 225, 215, 43, 34, 230. 44 
130 DATA35, 205, 55, 35, 43, 229, 205, 127, 10, 42, 33, 45, 53, -167, 40 
140 !)ATA1B3, 87, 24, 4, 24, 48, 24, 44, 64, 42, 1,21 1,255. 14, 252, 44, 42 
150 data:, 211. 255, 14,252,58,44,54,230,4,32,7, 124, 181,40,3,43 
140 DATfl24, 228, PS, 50, 154, 44, 225, 209, 193, 215, 195,30, 29,83,79 
170 DATAB5, 78, 48, 209,225,241 

Pack the strings to be used in the program. 



180 »=CHRt(149) + ' "+CKRt(1701 
1 90 A» (fi I :CHRJ 11441 tCHRt ( IB3i +CHR* (183) +(:HR» ( 
200 M ( n=CHR« ' 174! tCHR»( 1871 tCHRt ! 137 1 tCHRt ( 
210 B» (0)=CHR» ( 152) tCHR» ( 1791 +CHR1 (1431 tCHRJ i 
220 Pl(I)=CHR«(liBHCH(JH143l+CHSi(143KCHR»! 
250 Ci(0)^CHR*il76)+CHR»ilA3t+CHR$(1311+CHR«': 
240 C» ' 1 ) =CHRJ (1401 tCHfit ( 1 79l tCHR$ U 31 1 tCHRt I 
250 Dl(0)=CHR<U56i+CHRH1741iCHR1(1791+CHR«( 
240 D»il)=CHRt(l4DKHR»il74)+CHR»(179!fCHRtl 

Initialize program variables. 



270 CLS;Dt=3TPIf^Bt(15,131);fiOEUS54O;B0SUB550:GQSUB54O:GDSUB57O;F 

RINTJ9'3,D»; 

280 P-0:S=990!F9=! 



183I+CHR*(132) 
ie7;+CHR»(132l 
i;»i+CHR«(144i 
U7HCHHt'1461 
143l+CHR«(174! 
179)+CHRt'1401 
157fti;HRl(!721 
157) +CHR«( 1421 



Start of main loop. 

31J 300 PRINTiO,;:SOUND100,5 




Check for keyboard input. 

310 IFPEEM 14456) =32DRPEEK(151 19) =4TH£NFM 
320 IFPEEK 1 1 4454 1 =440RPEEI', 1 14B30! = 129THENF-2 
330 IF<'£EI'I!4912!=128THENF=3 

Print the trail of player's missile. 

340 PRINTJ:,".'; 

Move player's missile according to input. 

350 IFF=!TH£NS=S-47ELSEIFF=2THENS=S-4!ELSEIFF=3THENS=S-44 

Print missile base. 

340 PPINTJ989,It; 

if missile goes off the screen, reset its initial position 
and subtract one from missiles remaining. 

370 !FS 0TH£NCLS:F=0:S=99O;Dt=LEFT(lDJ,L£N'Dil-!):lFLEN(Di)=0THE 
H580 ELBEPR!NT3993,D<! 

Print player's missile and score. Beep. 

380 FB!(ITSS,CHR1'1M!;;PRINTJI010,"SCQRE;';SC;;IFS<>990THENPRINT 

JO,;:SQL1NDI1,10 

390 PRINTS94il,"NUn8ER OF SHIPS HIT!";SH; 

Toggle between ship designs based on value of F9. 

400 F9ri-F9 

Test to see if a ship is hit. If it is, print "BOOf^", 
beep, add the score, and reset ship's position. 

410 IFS'>Al-3ANDS<Al+5THENPRINT9fll,"B00n "fiPRINTJO, (:5DUhiD255,75 
:PRINT3ftl.'' ";:SC=SC+Bl:SH=5H+l:6aSUB540 
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Protect 

Your 

Investment 



Protect your SoftSlde 
back issues (combined 
editions) with these 
sturdy binders. Covered 
with durable wood-grain 
vinyl, each 8'/2 x 11 inch 
binder has an inside 
pocket and clear sleeve 
on the spine which 
you can label for 
easy identification. 
Each binder holds 
12 issues. 

8'/2xll $7.95 

Please include $2.50 per order 
for shipping and handling. 

See page 80 for 

ordering information & baclt 

issues bind-in card. 
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6 South Street. Mllford, NH 03055 



SELL 

YOUR 

PROGRAM 

AND KEEP 
IT TOO! 



One of the nicest things about selling your program 
to SoftSlde is that It's still your program after we buy 
it. Actually, what we are buying is the right to publish 
your program once in our magazine and on subscrip- 
tion disk and tape. This is what we call "one-time 
rights." Three months after your program appears in 
SoftSlde, you are free to sell it again to anyone. And, 
now that it's been published, your program is worth 
more. So send today for a copy of our free author's 
guide and find out how you can sell your program and 
keep it too. 

Write to: 
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&£ 



Publications, Inc. 

Dept AG1 

6 South Street 

IVIilford, NH 03055 
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420 !FS>A2-3ANDS<A2+5THENFRINT3A2,"B00I1 ";;PRINT30,i!Si 

!PRINT8ft2," ";:SC=SC+B2!SH=SH+l!B0SUB550 

430 IFS>A3-3ANDS<A.3+5THENPRINTSA3,'B00!1 •!!PRINT80,;!S0UN1)255,75 

:PRINT3A3," ";:SC=.SC+B3:SH=SH+!:60SUB5iO 

440 IFS>A4-3ANDS<A4+5THENPRINT3A4,'B00I1 "|:PRINT30,;:SOUND255,75 



iPRINTM*. 



;SC=SC+B4!SH=SH+l!60SUB570 



Move ships and print them. 



450 PRINTSAl," 
460 PRINT3A2," 
470 PRINT3A3," 
480 PRINT3A4," 



;:Al=A!+Bl:PRINT3Al,A$(F9i 
;:A2=A2-B2:PRINT3A2,B$(F9) 
;:A3=A3+B3:PRINT3A3,C$(F9! 
:!fl4=A4+B4!PRINT3A4,D$fF9) 



Test to see if a ship has reached the edge of the 
screen. 

490 IFADKTHENPRINTSAl," •;:60SUB540 
500 IFA2<!28THENPRINT3A2," ";:60SUB550 



m !FA3>318THENFRINT3A3, 



"i!60SUB5iO 



520 !Fft4)446THENPR!NT3A4,' ";:60SUB570 

Return to start of main loop. 

530 B0TO30O 

Set the initial position and speed of ships. 

540 AI=0ie!=RND(5!:RETURN 
550 A2=19i:B2=RNDi5SiRETURN 
5fcO A3=25i:B3=RND\5):RETURN 
570 A4-384:B4=RND(5J:RETURN 

Print end of game message. 

5S0 PRINT3472,"0UT OF BULLEIS""; 

590 IFSC>HITHENHI=SC 

600 PRIMT3540, "SCORE: "jSC; 

610 PRINT3601,'HISH SCORE:"; HI; 

620 PRINT3665, "NUMBER HIT:";SH 

630 PRINT3920,"PLAY AGAIN' (Y./N)" 

640 U=INKEy$:IFI$<>"Y"ANDI$<)"N"THEN640 

650 IFI$=»Y"THENSC=0:SH=0:G0T0270ELSEEND © 



TRS-80® SWAT TABLE FOR: 
SPACE FIRE 


LINES 


SWAT 
CODE 


LENGTH 


10 - 


70 


'^^ m^::. 


525 


80 - 


160 


m 


512 


170 - 


210 


LH 


479 


300 - 


410 


«ft 


439 


420 - 


510 


m 


513 


520 - 


630 


TL 


277 


640 - 


450 


iZ 


60 



SoftSide 



TRS-80" 







Fliptag is a chase/maze game pro- 
gram for a 16K RAM TRS-80® 
Model I or III. 

Fliptag is a graphics game based 
on a popular children's game. Two 
players start off on opposite sides of 
a giant maze. The player with the ar- 
rows next to his score is the 
"chaser;" his aim is to "tag" the 
other player by running into him. 
The "chasee" attempts to maintain 
his distance by adroitly maneuver- 
ing through the maze. To spice 
things up a little, the computer ran- 
domly switches the players' roles: 
the arrows at the top of the screen 
switch sides, the bottom of the 
screen flashes a warning, and sud- 
denly "chaser" becomes "chasee!" 

Each "tag" gives the current 
"chaser" one point. Ten points are 



required to win the game. Players 
can move only up and down, not 
diagonally. The player on the left 
uses the up and down arrow keys to 
move vertically, "W" to move left, 
and "E" to move right. The player 
on the right uses the right and left 
arrows to move horizontally, "P" 
to move up, and ";" to move down. 
For extra speed, a USR function 
is used to determine which keys are 
being pressed. If the function's 
argument is 0, it returns a value for 
the left player's keys; if 1, the value 
is for the right player's keys. The 
value returned for "up" is -64, 
"down" is 64, "left" is -1, and 
"right" is 1. If none of those keys 
are pressed, a is returned. The 
reason for this arrangement may not 
be readily apparent, but the purpose 






is simple enough: the value returned 
is the value that should be added to 
the current screen position of the 
player token to move it in the cor- 
rect direction. That is, to move a 
player "up," you add -64 to his 
screen position. 
Try out the game; you'll hke it! 



Variables 



A$(0-1): Pointer arrows for each 

player. 

A(O-l): Where to put A$(0-1) on 

the screen. 

B: 32 (ASCII blank). 

C: "Chaser" player number. 

D: Delay loop. 

F: 15360 (memory location of first 

screen position.) 

1(0-1): Initial player locations. 

K: Contents of location to which 

player is trying to move. 

L(O-l): Player locations. 

L: General purpose loops. 

M: Player's move. 

N: Number of moves done. 

P(O-l): Points. 

P: Player to be checked for move. 

R: 191 (graphics rectangle). 

S(O-l): Where to print scores. 

S$: Two-digit score. 

S: "Moves until" switch. 

SL: Length of blank string to put 

on screen. 

SP: Screen position of blank 

string. 

T$(0-1): Player tokens. 

U,UD,UU: USR routine set-up. 

W: 1. 

WP: Winning number of points. 

Z:0. 
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ss ss ss ss ss ss ss ss ss ss ss ss 

ss ss 

ss TRS80 BfiSIC SS 

SS 'FLIPTftS' , SS 

SS ftUTHOR! THONfiS S. HANLIN III SS 

SS COPVRISHI !Ci 1982 SS 

SS SQFTSIK PUBLICATIONS, INC. SS 

SS SS 

SS SS SS SS SS SS SS SS SS ss SS SS 



If you don't wish to type this program, it is also 
included on this month's SoftSide CV and DV. 



Initializer. 

JiLCLEARlE3:RAND0!1:DEFINTfl-Z:Z=0:S=!:R=19!:DI«fl(«>,fl$(WJ,I(H!,Lf 
W5,P!N),S(Wi,T$(W)!60SUB90:T$a)="»":T$(«)="«":WP=10in2J=65:I(M 
)=12i:L!Z)=nZ!!L(W)=IfW)!AfZ)=5:A(«!=53!A$(i:!=:STRING$(5,60):A$( 
W!=STRIN6$(5,62):B0SUE80:PRINT8A(C!,A$!C)| 

Checl< for key press. 

20 IFPEEK(!4463)=ZTHEN20 

Translate keypress into move. 

30 I1=IJSR (P! i IFf1=ZTHEN50ELSEIFN>STHENF0RL=HT03! PRINT3960, STRIN6$ ( 
43,Bi;iPRINT3960,STRIM6*(63,R);:NEn;PRimA(C),STRINBI(5,R>;:C^ 
W-C:N=Z!S=RND(140!+10!pRINT3A!C!,A$fCJ;:60T020 

Check results of move. 

40 K=PEEKfFtL(P)+l1!!lFK=BTHENPRINm(P)," "pN^N+KiKPNLCPl+HiP 
RINTJL(P),T»iF!;ELSEIFK=420RK=35THENi0 

Next player. 

50 P=«-P:fiQT030 

Score, increment points and check for win. 



60 P(C!=P{C)+H!S$=RISHT$fSTR$(P{C)),2):IFLEFT$!S$,«)=" "THENS«=" 

0"+RISHT$(S$,«) 

70 PRINT8SiC!,S$;:IFP(C)=klPTHENF0RL=z™STEPZ!pRINT3L(C)," "pPR 

INT3A(C),"tN!NI"j:F0RD=ZT022:NEn:PRINT3L(C),T$(C);:PRINT8fl(C),S 

TRING$(5,R);:IFPEEK(144O0!=«THENRUNELSENEnELSEN=Z!BOSLlBB0!PRINT 

8A(C),A$(C)j:60T020 

Switch players' roles. 

80 PRINT8AfC!,STRIN6$S5,R!|!F0RL=ZT0tf:PRINT3L(L!," 'siKLS^KD: 
PRINT3LiL),T*(L)i:NEn:C=N-C!N=Z!S=RND!140)+10:RE™N 

Set up screen. 

90 CLS!C=RNDS2!-I:F=15340!B=32;S(Z)=2:S(«)=59:F0RL=«T04iPRINTSTR 
IN6t!255,R);!NEn!F'RINTSTRING$(3,R!;!P0KEl6383,R!F0RL=«T011l!REA 
DSP,SL:PRINT3SP,STRINS*iSL,B)-,:NEn:PRINT3S(Z),"00'i:PRINT3Si«i, 
"00";;IFSL-19THENPRINT"t» DATA ERROR «««":STOP 

' USR routine. 

100 LI$="012345i7e9012345A7890I234567890!2345i7890123456879012345 

67390I234567890123456789012345i7890123456789" 

no U=VARPTRtU«!!UU=PEEK(U+«)+PEEK(U+2)t25i:F0RL=UUT0UU+92!READLl 

0!P0KEL,IJD!NEXT!!FUB-218THENPRINT"»II DATA ERROR «t»"iSTOPELSEIF 

PEEKilH96)=201THENP0KE1452A,PEEKfU+W)!P0KEli527,PEEK(U+2hRtTUR 

NELSECI113"T":DEF!JSRO=UU!P0!(E143O8,Z:RETyRN 

Screen data. 

120 DfiTft45,9, 79, 32, 112, 6, 121, 6,129,1,137, 1,139,6, 171, 1,174,3,180 
,7, 190, 1.193, 1,201, 1,203, 2,206,7, 214, 19, 235,1, 237,2,240, 1, 254, 1, 
257,9,267,2,270,2,275,2,278,2,292,1,295,2,299,1,301,1,304,15,321 



,1,327,6,334,7,342,2,345,13,359,2,363, 



3,2,377,1 



130 DATA385,4, 391, 2,403, 1,406,2, 409,2, 420,2, 423, 2, 432, 2,435,5,44 

1,6,452,2,455,31,487,2,490,8,499,1,503,3,509,2,513,4,519,2,526,1 

.534,2,549,1,551,2,554,2,563,3,569,6,577,1,583,2,587,4,592,5,598 

,22,62!,7,&29,3,638, 1,641, 1,643,6,650,4,656, 1,660,1 

140 DflTA665,2, 677, 2, 685, 2,695,5, 702,1, 705,3, 711, 2, 714, 1,720,2, 72 

3,2,729,2,737,0,747,4,759,1,763,4,769,1,771,28,801,1,808,1,811,1 

,814,14,829,1,833,1,346,1,853,1,862,1,865,1,872,4,893,1,897,14,9 

17,10,929,8,939,19 

USR routine data. 

150 MTA205, 127, 10, 125, 183,32,52,58,64,56,230,8,40,5,33, 192,255, 

24,37,58,64,56,230,16,40,6,33,64,1,37,24,24,58,4,56,230,128,40,5 

,33,255,255,24,12,58,1,56,230,32,33,255,255,35,40,1,35,195,154,1 

0,58,64,56,230,32,32,229,53,4,56,230,1,32,197 

160 DATA58,32, 56,230, 8,32, 202,58,64, 56,230,64,33,255,255,35,40,2 

21,24,218 © 
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FLIPTAG 


SWAT 




LINES 


CODE 


LENGTH 


10 - 70 


vu 


634 


SO - 110 


NP 


526 


;2J - 140 


HZ 


690 


150 - 160 


HJ 


306 
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SoftSide DV, the magazine 
of the future, is here! 



tf your computer could pick a 
magazine, wouldn't it prefer one 
in its own language? Now 
there's one available. . - *i 

SoftSide DV . . 

is an enhance- * 

ment of the « ' . 

SoftSide , ^.k . * 

you have 
in your 
tiands. 



SoftSide DV contains 
not only the complete 
programs listed in 
every month's issue of •• 
SoftSide, but additional 
programs of every 
conceivable type, as well 
— multiple and Machine 
Language programs, modified 
languages, ongoing ■ 

modular programs and software '., 
so extensive, it would take an * , 

entire issue of SoftSide just to * ■ 

print the code. Only the \.^ ^' 

documentation for these programs "^ *' *- ,^- 
will appear in SoftSide Magazine, ^~i* 

NOT the code. •^ . 

Feel as though you're missing " » 

something? You are! But, you needn't 
miss out on another issue. SoftSide . • 

DV is now available for Apple™, 
ATARI® and the TRS-80® . The cost to 
you — $125 for 12 magazines and 12 
disks, packed with some of the best 
software available, all delivered to your 
home in the next year. For orders outside 
the USA, please add $36. For your 
convenience, we offer an installment payment 
plan for VISA and MasterCard holders: You pay only 
$32.50 per month for four months (a total of $130, which 
includes a $5 billing charge). Please use the special DV- 
CV bind-in card in this issue to order. 

Computerists are offered the rare opportunity of 
marching into a new frontier. Advance to the front of 
the parade by subscribing to SoftSide DV, the magazine 
of the future, available today! 
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APL80 



by Phelps Gates 




APL80 is a large subset of the APL 
language adapted for the TRS-80® 
Model I/m with 32K RAM and disk 
drive. It is included as the bonus pro- 
gram on issue 36 TRS-80 DV. See the 
Bind-in Card elsewhere in this issue to 
order this month's disk. 

Editor's Note: These instructions 
assume that you know APL or have ac- 
cess to a manual which describes it. Only 
the differences and limitations of 
APL80 are described here. 

On the Model I, APL80 uses arrow 
keys to perforin certain functions. The 
Model III uses the following characters 
in place of arrows. 

t C -<" 3 

^l' \ -►A 

Another note on the Model III version 
ofAPLSO: The shifted @ key is used as 
a function, while the unshifted @ is used 
to exit the insert/replace submodes. This 
is the opposite of how the Model I 
APL80 operates. 



The APL80 keyboard diagram shows 
the various APL characters that can be 
simulated using the TRS-80 keyboard. 
Most are simulated by holding the 
SHIFT key down and then depressing 
another key. Of course, a shifted 4 is still 
displayed on the screen as a dollar sign, 
for example but it stands for "not- 
equals" in APL-80. 

Shifted letters are used to represent 
many APL80 functions. These instruc- 
tions will use lower case letters to repre- 
sent shifted letters. Since an unmodified 
TRS-80 Model I doesn't have the ability 
to display lower-case letters, APL80 
automatically prints a graphics dot at the 
left of a shifted letter to distinguish it 
from an unshifted letter. 

Note that round parentheses are used 
for indexing (as in BASIC). Also, arrows 
are used for Grade Up/Down. Since 
these are monadic and Take/Drop are 
dyadic, no ambiguity arises. 
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APL80: -(-/IdMATRIX ("plus- 
reduction on the first dimension") 

This applies to reduction, compression, 
expansion, scan, reversal, and rotation. 



Loading APL80 

To load APL80 from disk, just type 
APL80 from the DOS READY mode. 



Character Set 

APL80 redefines certain keys to get 
characters not normally available. With 
older Model I's, you can type all four ar- 
rows by pressing the SHIFT key, to- 
gether with the appropriate arrow. If 
you have a Model III or late revision 
Model I, hold the shift, down arrow, 
and Z to get the down arrow. Also, you 
can type an underscore by pressing the 
CLEAR key. 



Format 

The f operator establishes a format. It 
must come first in a statement, followed 
by a vector with an even number of 
elements, specifying the field size and 
number of decimals for all following 
numerical output. Note the difference in 
notation: 

APL: 6 3 ^OUTPUT 

APL80: f 6 3 

OUTPUT 

The format continues in effect until 1) 
a new f statement, 2) an error or system 
command, or 3) any character output. 

The d operator chooses the dimension 
along which a matrix manipulation is 
performed (square brackets in APL). 

APL: +/C 13 MATRIX 



Getting Started 

The disk contains five workspaces 
which explain some of the ways you can 
use APL80. They are: LESSONl/ 
APL, LESSON2/APL ... LESSONS/ 
APL. To run the first lesson, just type 
)LOAD LESSONl/APL. The disk also 
contains a workspace called CUSTOM/ 
APL, which provides a number of 
modifications to APL80. )LOAD 
CUSTOM/APL will load this work- 
space, which is self-documenting. 



System Commands 

The following commands correspond 
to APL, with minor differences: 

)OFF )CLEAR )FNS )VARS )SI 
)ERASE )RESET 
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In the variable list, any active local or 
dummy variables are marked with an 
asterisk. 

)ERASE name — will erase a variable 
or function. 

)CLEAR — erases everything... you 
start fresh with an empty workspace. 

)SI ("State Indicator") — lists any 
functions which have been stopped by 
an error or BREAK with the number of 
the Une which was about to execute. 

)RESET — clears the SI. Numerous 
interrupted functions use up memory 
and slow down execution, and will even- 
tually cause a depth error. 

)SAVE filespec — saves the current 
workspace. (Its previous contents are 
lost.) 

)LOAD filespec — loads a work- 
space. 

)KILL filespec — will delete a file 
from the disk. Any file, not just APL80- 
created ones, can be killed. 

)COPY filespec — merges the work- 
space named into the current work- 
space. Duplicated objects replace the 
corresponding items in the current 
workspace; individual objects cannot be 
copied. 

)DOS — returns to DOS READY. 
You can then execute DOS commands 
(such as DIR or KILL). To return to 
APL80 with the workspace intact, type 
RETURN. 

)AUTO expression — puts a latent ex- 
pression into the workspace. If the 
workspace is then saved and loaded, this 
expression will automatically execute, 
unless you override this feature by 
holding down the space bar during 
loading. 

)EXEC — executes the latent expres- 
sion, if any, in the current workspace. 

)TRON — turns on trace. Function 
name and line number are printed just 
before each statement is executed. 

)TROFF — turns off trace. 

)PS ("print single") — makes APL80 
print numbers with 6-digit precision. 
Only output is affected; calculations and 
variables continue to have 15-digit preci- 
sion. This will considerably speed up 
output, expecially if format is used. 
)PD ("print double") — restores 
15-digit precision in output. 
)RAM -- enables the PEEK, POKE, 
and CALL functions. (See below under 
"RAM interaction".) 



The READ, WRITE, RESTORE, UP- 
DATE and QUERY commands are 
described below, under "File 
Handling." 



Function Definition 

The syntax of functions in APL80 is 
identical with APL, but the mechanics 
of function definition differ. Some func- 



tions are like programs — you just type 
their name and they execute. These are 
called "Niladic." Other functions are 
like operators, and require arguments. A 
"Monadic" function has one argument; 
a "Dyadic" function has two. To create 
a function, use the )DEF command, 
followed by the header of the function 
(line 0). Examples: 

)DEF NILADIC 
)DEF RES<-LEFTARG NAME 
RIGHTARG; LOCI; L0C2 

The function name must not be in use 
already, or a DEFN ERROR results. 

To change or display a function which 
already exists, use )EDIT, followed by 
the function name. 

)EDIT NILADIC 
)EDIT RES 

The )DEF and )EDIT commands put 
you into definition mode, and APL80 
will prompt you for the first unused line 
of the function (line 1 for a new func- 
tion). Type the statement, press 
ENTER, and it will ask for the next line. 

To leave definition mode, press 
BREAK. 

To display the function, type )? (and 
press ENTER). 

To type the function on a printer, type 
)H. 

You can avoid screen scrolling in long 
functions by typing )P followed by a line 
number; APL80 will display 14 lines, 
starting with that number. Example: 
)P21 prints lines 21-34. 

To replace a line, type ) followed by 
the line number which you want to 
replace. For example, typing )2 will 
replace line 2. 

To insert a line, type )I followed by 
the Une number where you wish to insert 
a new line. For example, typing )I2 will 
insert a new line between lines 1 and 2. 

To delete a line, type ) and the line 
number. Then, when APL80 asks you 
for a replacement, leave definition mode 
(with BREAK) or ask for a display with 
)? or )P. 

Whenever you insert or delete a line, 
APL80 immediately renumbers the lines 
in sequence. If you ever get confused 
about the numbers, just type )? for a 
display of the function with the current 
Hne numbers. 

As in APL, errors are normally not 
detected until a function is executed. Ex- 
ception: syntax errors involving "-" 
(such as 3-3) or single number domain 
errors (1E99) will be detected during 
function definition, and will cause an ex- 
it from definition mode. 

You may also edit a function line by 
typing )E followed by the number of the 
line which you want to edit. APL80 will 
display the line at the bottom of the 
screen, with an edit pointer above it. 



Note that in edit mode, the graphics dots 
used to represent lower case letters on 
unmodified Model I's are displayed 
below the letters, rather than at the left. 

To move the edit pointer, press the 
left or right arrows. To insert text at the 
pointer, press I. To delete text at the 
pointer, press D (hold down to repeat). 
To replace text at the pointer, press R. 
To cancel changes and start fresh, press 
A. To complete the edit session and ac- 
tually change the function line, press 
ENTER. Pressing I or R puts you into 
insert/replace submode. To exit from 
this submode and return to edit mode, 
press shifted @. 

If a line exceeds 64 characters, a 
length error results. 

Since APL80 replaces double 
apostrophes (">■/") in function Hnes 
with single apostrophes, you must 
replace the second one whenever you 
edit the line they are contained in with 
)E. 

The header cannot be edited. 



Limitations 

Transcendental functions, including 
*, are accurate only to six digits. Matrix 
inversion, lamination, and the diagonal 
case of dyadic transposition are not im- 
plemented. Encode and decode are 
limited to vector arguments. The 
arguments of ! must be integers. Hyper- 
bolic functions are not implemented. 
Multiple specifications (X^Y4-9) must 
be split into two statements. This also 
applies to implied multiple specifica- 
tions, such as % X 4-9. A quad can't be 
typed in response to another quad. 
(Quote-quad is OK.) No more than 32 
functions can be defined in a workspace, 
and a function can't have more than 25 
lines. 

The # and s Operators 

The operator # converts numeric 
arguments to characters and vice versa, 
like CHR$ and ASC in BASIC. Try, for 
example, #28 31 150 or #'ABC'. In addi- 
tion to the Level II control characters 
(except 14 and 15), APL80 recognizes: 



#3 


begin 16-zone print mode 


#5 


begin printing hard copy 


#6 


randomize workspace (like 




RANDOM in BASIC) 


#7 


begin 8-zone print mode 


#9 


stop printing hard copy 


#11 


restart random link 




(?100 will give 77) 


#15 


begin 4-zone print mode 


#16 


stop real-time clock 


#17 


start clock 


#18 


reset clock to zero 


#255 


cancel zone printing 



#-1 to #-1023 are equivalent to 

PRINT @ 1 to PRINT ( 
1023. 
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S.N.A.P." 



Super Name, Address, & Phone 
program. Create, maintain, and 
print your personal phone 
directory, customized mailing list 
labels, business propsect lists, 
etc. Sort by your own special 
categories $19.95 



HANDS ON - 

Tasteful erotic fantasy adven- 
tures for adults. Experience the 
joy of erotic exploration and 
tactile sensations. Get in touch 
with the incredible variations in 
human sensuality. Superb color 
graphics. 
Adults only $29.35 




PLEASURE 



An electronic game dehght for 
adult couples. Graphic sensual 
adventures designed to ignite 
your imagination and expand 
your romantic repertoire. 
Adults only $29.95 

• Mail ordeis CfncK Money ordtr, Ciidit card 

U(LLAGE SOFTWARE 

Dept. SS-36 

31220 La Baya Drive. Suite 110 

Westlake Village, California 31362 

• Availftbia al leading coinputBr stores. 

AiM II. S& slapping and PmrdlHg par ardir. (SS pianaai.) 
Cdtfsfaia rttidtKls add fi'/^H lalat lax. 

fat eridrt ca^d Dfdars. inciuda accstial BHffibat. 
ajyiradan data ind »|natala. 

Na^iiamuii. tin Appli II w ll^ Sagla PU OiiM, 
Ap9lau)l hi RDM jFiiinwiiaf. 
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Once begun, zone printing continues 
in effect for all numeric output until 
cancelled by #255. If you call for hard 
copy with #5 with no printer connected, 
nothing will happen. 

The monadic s operator has these 
uses: 

sO: the time since sign-on (in 25ms in- 
crements on the Model 1, 33 I /3ms in- 
crements on the Model III). 

si: the "read pointer:" the number of 
the record which will be read by the next 
READ command (see File Handling). 

s2: the "update pointer:" next record 
to be updated. 

s3: number of records in the most re- 
cently accessed file. 

s4: "line counter:" the number of the 
line currently executing. To continue ex- 
ecution of a function after pressing 
BREAK, type s4. 

s5: number of free bytes in the work- 
space. 



Apfin IL II*. and Apylawfi Ma iiadaniarlLi at Aapla 
Caatpirtaf, lac. Prvfrani ddai aia Iridaaiafks at VilltyB 
SattHiara Carp. 
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Miscellaneous 

Function and variable names may 
contain "." and "-": THIS-IS-A- 
NAME AND. SO.IS. THIS. Watch out: 
M minus N is "M_N". "M-N" is a 
reference to a variable named "M-N", 

All comparison operators may be used 
with character arguments (X $k2 z ); 
also Grade Up/Down, but not reduc- 
tion. 

?0 yields a random number between 
and 1. ?I0 yields a random integer from 
I to 10. 

ENTER always terminates a quoted 
string. To include carriage returns in a 
string, use line-feed (unshifted down 
arrow). 

Pressing BREAK will terminate func- 
tion execution, even if the function is 
awaiting input from a quad or quote- 
quad. 

You can temporarily freeze output by 
holding the space bar down. 

The operands of comparison 
operators must be of the same type 
('A' = 2 gives a domain error). 

Statements in function listings and er- 
ror messages may differ slightly from 
what you typed. Usually the difference is 
just in spacing, buy try, for example, 
.00001 "VoO. 

The semicolon used to index multi- 
dimensional arrays does not function as 
a strong delimiter. This means that 
parentheses must be used around com- 
pound expressions used as indices: 
MAT((l-l-2);2). 

Indices need not be integers: APL80 
uses the integer value of the indices. 

When syntax errors occur, APL80 
sometimes detects them at a different 
point than APL, and behaves different- 
ly. Example: If FUNC does not return a 
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value, the statement FUNC + FUNC will 
result in an error before the function is 
executed. APL80 also differs from APL 
in its treatment of duplicate func- 
tion/label/local variable names. 



RAM Interaction Functions 

APL80 includes PEEK, POKE, and 
CALL functions. To avoid unfortunate 
accidents, these functions must first be 
enabled with the )RAM command. 
Monadic u is PEEK: the right argument 
is a RAM location (0 to 65535). The 
function returns the contents of that 
location. Dyadic u is POKE: the left 
argument is put into the location given 
by the right argument (example; 
65ul6000 puts an A onto the screen). It 
returns a value; the contents of the loca- 
tion after the POKE (the same as the 
ROM argument, unless you're POKEing 
ROM!). Dyadic # is CALL; the right 
argument is put in the A register and the 
address given by the left argument is 
CALLed. It returns the value of the A 
register after the call. 



File Handling 

You can move the contents of 
variables to and from files using the 
)WRITE, )READ, )RESTORE, )UP- 
DATE, and )QUERY commands. You 
can include these commands in a func- 
tion by spacing once before typing the 
command. (This prevents the initial 
right parenthesis from being interpreted 
as a function definition command.) 

)WRITE VARIABLE filespec 

The contents of VARIABLE are 
added to the end of the file. If the file 
does not exist, it is created, and the con- 
tents of VARIABLE become the first 
record in the file. 

)READ VARIABLE filespec. 

One record (as written by one WRITE 
command) is read from the file into the 
variable. Which record gets read is 
determined by the current value of the 
"read pointer" (si). When APL80 first 
loads, the read pointer is set to I, and 
each READ command advances it by 1. 

)RESTORE 

Resets the read pointer to 1 . The next 
READ command will then read the first 
record in its file. 

)QUERY filespec 

Tells you how many records are in a 
file, and how big each one is, 

A record containing numeric data re- 
quires 4-i-2dH-8e bytes, where d is the 
number of dimensions in the stored 
variable and e is the total number of 
elements in it. Character data requires 
4 -I- 2d -I- e bytes. 

Since each WRITE or READ com- 
mand requires considerable overhead, it 
is more economical to write targe arrays 




to disk, rather than many small 
variables. Files are limited to 127 
records, with a total length of less than 
65535 bytes. 

If the "read pointer" is beyond the 
last record in a file, an empty vector will 
be read (you can use this as a test for end 
of file). Notice that RESTORE doesn't 
affect writing; the ) WRITE command 
always adds records at the end of the 
file. 

You can change the value of the read 
pointer (to access records at random) by 
using s as a dyadic operator with 1 as the 
second argument. For example: 3sl 
followed by READ will read the third 
record. Dyadic s returns the previous 
value of the pointer — if you don't want 
it printed, just assign it to a variable: 
DUMMY4-3sl. 

)UPDATE VARIABLE fflespec 

Writes the contents of VARIABLE to 
the file, not at the end of the file, but as 
a replacement for the record pointed to 
by the "update pointer" (s2). The up- 
date pointer is advanced by one. The 
new record must be the same size as the 
old one. You can change the value of the 
update pointer with dyadic s, with 2 as 
the right argument. For example: 4s2 
prepares to update the fourth record. 
RESTORE also resets the update 
pointer: it's exactly equivalent to Isl 2. 
If the update pointer is beyond the end 
of the file, or if the file doesn't exist, 
UPDATE is equivalent to WRITE. 

The following example shows how file 
handling works: 



7 _ 5 (press CLEAR for underscore) 

2* 10 

APL80 will also operate on groups of 
several numbers, called "vectors." For 
example, try: 



2 34 + 10 11 
5 % 1 2 3 
2*012345 



12 



Use a space to separate the members 
of a vector. Note what happens if you 
type 2 3 + 12 3 4. The vectors must be 
the same length, or one must be a single 
number. 

One slightly tricky thing about APL80 
is the way it handles minus signs. To 
subtract numbers, use the underscore 
sign (press CLEAR key): 5_3, for ex- 
ample. Use an ordinary minus sign to in- 
dicate negative numbers: 

-5 + 10 20 30 
10 _ -30 
3 + -10. 

This takes a little getting used to. 

Like BASIC, APL80 can store data in 
variables. Variable names may be any 
length (up to the length of the input 
line). To assign a value to a variable, use 
the left-arrow (shifted* — key). Try, for 
example. 

VAR4-1 2 3 4 5 

VAR*2 

VAR_VAR 

A value error will result if you reference 
a variable name which has not been 
assigned a value. 



A4-3 




B4-1 2 3 




C4-' HELLO' 




)WRITE A FILE/DAT 


(file created, first object 




is 3) 


)WRITE B FILE/DAT 




)WRITE C FILE/DAT 




)RESTORE 




)READ X FILE/DAT 


(X contains 3) 


3sl 


prepare to read third record 


)READ X FILE/DAT 


(X now contains 'HELLO') 


)READ X FILE/DAT 


(X contains an empty 




vector-end of file) 


UP4-4 5 6 




2s2 


(prepare to update second 




record) 


)UPDATE UP FILE/DAT 




2sl 


(now read updated record) 


)READ Y FILE/DAT 


(Y contains 4 5 6) 



Using APL 

The simplest way to use APL80 is to 
type an expression, followed by 
ENTER. APL80 will evaluate it and 
print the result. For example, try: 

2 -h 2 

2%3 

3x4 (use the shifted X key) 



Operators 

We've already met + / — (Watch out 
for those minus signs!), x (shifted x) and 
* (exponentiation). Addition, subtrac- 
tion, etc., are called "Dyadic" opera- 
tions: they involve two numbers, one 
before and one after the operator. 
APL80 also has "Monadic" operators, 
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which use only one argument, after the 
operator: for example, !5 equals 120 
(factorial 5). % can also be monadic 
(%5 equals .2, the reciprocal of 5). -I- 
and — may also be used as monadic 
functions (identity and negative) and x 
(sign). Monadic * is the exponential 
function (e to the nth). 



Order 

In APL, there is no hierarchy of 
operations — it doesn't do multiplica- 
tion before addition, for example. Ex- 
pressions are evaluated from the right. 
For example, 2x3 + 10 equals 26 — two 
times (three plus 10). This takes a httle 
getting used to, but it beats worrying 
about whether "and" is performed 
before "or," etc. In APL, you only 
evaluate from the right: 2x3 + 10_9 is 
2x(3-i-(10_9)). If you want, you can 
force any order by using parentheses — 
(2x3) -I- 10 is 16. 



Index-Gen 

The monadic operator i (Index 
Generation) produces a vector of 
numbers. 13 is 1 2 3, for example. iO is a 
vector of numbers, called an "empty" 
vector. 



Reshape 

The reshape operator (p) constructs 
an array whose dimensions are given by 
the first argument, and whose elements 
are taken from the second argument. 
The result will have as many dimensions 
(up to 64) as there are nimibers in the 
first argument. If the second argument 
isn't long enough, APL80 goes back to 
the beginning and starts over. 



Reverse 



Reverse (r) is an easy one — note that 
the reversal occurs on the last dimension 
(the columns). 



Product 



The notation A".xB ("outer product 
of A and B") indicates an array 
generated by mukiplying every element 
of A by every element of B. Any of the 
operators described in LESSONl/APL 
may be used: A". + B will add each ele- 
ment; A". = B tests to see if they are 
equal, etc. The notation A 4- .xB ("inner 
product") of two vectors means 
"multiply each element of A by the cor- 
responding element of B, and sum the 
resulting vector." Again, any of the 
basic operators may be used — 441 dif- 
ferent combinations are possible. 
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Quads 

The symbol q ("Quad") corresponds 
to BASIC "INPUT" — try typing: 
20 + q. You don't have to type a number 
in response — you can type an expres- 
sion (2 + 2), a variable name (must exist), 
a function which returns a value, or a 
character string, in single quotes, m 
("Quote-quad") is similar, except that 
(1) no prompt is displayed, and (2) what 
you type is treated as a character string. 



Semicolon 



You can use ";" to print several 
things on the same line. This is in addi- 
tion to the use of ";" for multi- 
dimensional indexing. 



Take-Drop 

A't'B ("A take B") selects A elements 
from the vector B. If B isn't long 
enough, it's padded out with zeroes, or 
blanks for a character string. The 
elements are taken from the start if A is 
positive, from the end if A is negative. 
A^-B ("A drop B") is the opposite — it 
drops A elements from the beginning or 
end. Take and drop also work with 
multidimensional arrays. The left argu- 
ment must be a vector, with one number 
for each dimension of the array, teUing 
how many to take or drop from that 
dimension. 



Encode 



Encode (t) switches from one number 
system to another. The left argument is a 
vector containing as many digits as we 
want in the answer, the right argument is 
the number which we want to convert: 2 
2 2 2 2 2 1 21 yields 1 1 1 (21 base 2). 
If the left argument is too short, any 
overflow will be lost. You can put as 
the first element in the left vector, in 
which case any overflow is put into the 
first element of the result. The numbers 
of the left argument need not be the 
same — to convert 100 inches to 
yards/feet/inches, try 3 12 t 100. 



Decode 

Decode (b) works like this: 

Think of the right argument as a vec- 
tor of digits in a number system whose 
base is given by the left argument. The 
result is the value of the number with 
those digits: 

16 b 7 15 15 15 gives 32767 

For a mixed number system, use a vec- 
tor on the left, with the same number of 
elements as the vector on the right. (The 
first may be a dummy.) How many 



seconds are there in 2 weeks, 3 days, 4 
hours, 7 minutes and 12 seconds? 1 7 24 
6060b2 3 47 12. 



Catenate 

A comma adds one vector onto the 
end of another — this is called "Catena- 
tion." Try: 1 2 3 , 4 5 6 



Index 

Just as in BASIC, you can use paren- 
theses to extract elements from an array. 
If an array has more than one dimen- 
sion, use a semicolon to separate the 
dimensions: MAT(2;3). A notation Uke 
MAT(;4) means "all the items in the 
fourth column." You can use indexing 
on the left of an assignment arrow to 
change individual elements of any array. 



Rotate 

Dyadic r rotates the right argument 
left as many places as specified by the 
left argument. Try: 

3ril0 

-3 r ilO 

Multi-dimensional ju-rays are rotated 
along their last dimension (columns). 

Grade 

•f- (grade up) and 4' (grade down) are 
monadic functions which tell the order 
in which you would need to select the 
elements of a vector in order to sort 
them into ascending or descending 
order. They are usually used in conjunc- 
tion with indexing. Try: 

A4" 54623 1 

4'A 

A('f'A) (sort the vector!) 

Shape 

Shape (p) is a monadic function. It 
yields a result which tells how big an ar- 
ray is — a vector of one number for each 
dimension. 

pi 2 3 4, for example, yields 4. 

To find the number of dimensions in 
an array, just use p twice: p p MAT. A 
slightly tricky detail — APL 
distinguishes between a single number, 
called a "Scalar," which has no dimen- 
sions (p3 yields an empty vector), and a 
vector of one element, which has one 
dimension — you can construct a vector 
of one element with reshape or ravel. 

Ravel 

The comma can be used as a monadic 
function to convert an array of any 
number of dimensions into a vector. If 



the argument is a scalar (0 dimensions), 
it is converted into a vector of one 
element. 



Index-of 



Function i can also be used as a dyadic 
function, to tell where the second argu- 
ment occurs in the first argument. (This 
is called "Index-of".) 9 3 4 614 yields 3 
because 4 occurs in the third position in 
the first argument. If the second element 
doesn't occur in the first, it yields a 
value one greater than the length of the 
first argument. 

If the second argument occurs more 
than once, only the first occurrence is 
found. 



Membership 

For each element in the left argument, 
e checks to see if it is found in the right 
argument. If it is, it yields 1 ; if not, 0. 
The result has the same number of 
elements and dimensions as the left 
argument. Try: 

1 e 1 23 1 



Branching Functions 

One of the aspects of APL which can 
be confusing at first is the way it handles 
branching. The right arrow (-^) is 
equivalent to GOTO in BASIC. For 
example: 

)DEF INFINITELOOP 

1: 'PRESS BREAK TO STOP' 

2:-)-l 
Or you can use labels: 

)DEF SQUAREROOT;X 

1: GETMORE: 'ENTER NUMBER' 

2:X4-q 

3: 'THE SQUARE ROOT OF';X; 
'IS';X*.5 

4: -^GETMORE 

Note the use of X as a local variable in 
this function. This allows us to call the 
function without affecting any value 
which we may have stored in a variable 
called X. The shifted q (for "quad") 
prints a prompt and waits for input 
(APL D). 

Note that it is preferable to use labels 
for branching, since the numbers of Unes 
within a function will change when func- 
tion lines are inserted or deleted, but the 
branch statement will not. 

Conditional branching is a little 
trickier, since APL doesn't have 
operators which correspond directly to 
IF or THEN in BASIC (or FOR... 
NEXT). Of course, you don't have to 
use branching as much in APL as in 
BASIC. Since APL can operate directly 
on arrays, a single APL line can often do 
the work of a whole program in BASIC. 
Sometimes, however, you do have to 
branch conditionally. Consider the 
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following function, which generates 
Pascal's triangle of binomial coeffe- 
cients^ 

)DEF TRIANGLE 

1: K4-1 

2: ANOTHER: K^K+1 

3: l,(iK)!K 

4: -►another 

This will print Pascal's triangle, but it 
won't stop — it just keeps printing lines 
until the numbers get too big and you get 
a DOMAIN ERROR. We need to test K 
and loop back only if K is less than 10. 
To do this, we have to know the rules for 
branching in APL. There are three 
cases: 

1 . The line number (or label) exists in 
the current function. Control simply 
passes to that line. 

2. The line number doesn't exist in the 
function (-►O or -^999 or-*-l or just 
^). The function terminates: this is 
equivalent to RETURN in BASIC. 

3. The expression to the right of the 
arrow is an empty vector (iO). No branch 
occurs; control just passes to the next 
line. 

In the TRIANGLE function, for ex- 
ample, we could change Une 4 to: 

4: ANOTHER xK< 10 

Now if K is less than 10, the logical ex- 
pression K< 10 will have the value 1 
(true), and the expression in line 4 will 
have the value ANOTHER x 1, which 
equals ANOTHER. On the other hand, 
if K is not less than 10, the expression 
K< 10 has the value (false), and the 
function branches to ANOTHER x 0, 
which equals 0, and so the function ter- 
minates, by rule 2. 

We could also write line 4 as: 

4: ANOTHER xiK< 10 

If K is less than 10, this branches to 
ANOTHER x i 1, and since i 1 equals 1, 
this is equivalent to-> ANOTHER. If K 
is not less than 10, we get ANOTHER x i 
0, and since multiplying an empty vector 
by anything still gives an empty vector, 
this is equivalent to ->i 0. No branch oc- 
curs (rule 3), but since there aren't any 
more lines in the function, execution ter- 
minates anyway. 

This works fine mathematically, but it 
doesn't make your programs any easier 
to read. One solution would be to define 
a function, to figure it out for us. For 
example: 

)DEF BRANCH4-LABEL IF 
CONDITION 

1: BRANCH*-LABEL x i 
CONDITION 

Now we can write line 4 of the 
TRIANGLE function as 

4: ANOTHER IF K< 10 
which makes a little more sense. The 
function IF computes the proper 
destination for the branch, depending 
on the value of K. Note that we don't 
have to call it IF; you could call the 
function PROVIDED.THAT or SI or 



whatever. It's a dyadic function, requir- 
ing both a left operand (the label) and a 
right operand (the condition), and it 
returns a value (the appropriate destina- 
tion). 

You can also do it backward, and 
define a function called UNLESS: 

)DEF BRANCH-eLABEL UNLESS 
CONDITION 
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1: BRANCH*-LABEL x i n 
CONDITION 

and rewrite the TRIANGLE function as: 

4: ANOTHER UNLESS K>9 
Instead of using multiplication, you can 
define the IF function using the com- 
pression operator: 

1: BRANCH ^-CONDITION/ 
LABEL © 



Editor's note: An enhanced version 
of APL-80, called APl.*80/Pl.lfS, is 
available for the TRS-SO Model III 
from STSC. Inc., of Kockvilk; MIX. 
for $295.00 

APL*80/PLU.S is one uf a family 
of APL implementations offered by 
STSC. The interpreter is partially 
RAM resident, with overlays on the 
disk to be called in as needed. The 
system comes with a custom character 
set in ROM which provides the full 
APL character set. 

Some of the extensions implemented 
by STSC include support for parallel 
printer output, full terminal mode 



with RS-232 support, FMT report for- 
matter, 16 digit floating point math, 
' 'HEL P ' ' system for on-line documen- 
tation of system features, STOP and 
TR.4CE debugging facilities, and 
native graphics support. 

The system supports TRSDOS vl.3 
and LDOS v5. /, and allows access to 
native DOS files. 

Further information is available 
from: 

STSC, Inc. 

2115 Ka.st Jefferson St. 
RoLkville, Ml) 20852 
(301) 984-5000 



Convert Your TRS-80* 
into a World Class Computer 

THAT REDUCES EYE FATIGUE 
AND DOESN'T FLICKER 

- with LSI 's new Soft-View ™ Replacement CRT - 

The black & white "TV Screen". CRT (picture tube) which came with 
your TRS-80* is an inexpensive rapid "P4" Phosphor CRT intended for 
TV use. The display is actually strobing 60 times a second. No amount 
of "green plastic" will stop this strobing or eliminate the eye fatigue it 
causes. But a new Soft-View CRT display tube with a slower decaying, 
colored Phosphor will. 

• Available in slow-decay green (similar to new IBM* and APPLE III* 
monitors) or medium decay "European Orange" (easy on the eyes, 
elegantly beautiful, and the standard for CRT displays in Europe). 

• Leaded glass stops X-ray emission. 

• Optional Anti-Glare Frosted Glass available to reduce eye strain 
from glare. 

• Easy installation — tubes come with pre-mounted hardware. 

• 30-Day Money-Back Guarantee, 1 Year Warranty. 

• Ideal for Word-Processing & Programming, fast enough for Games 
& Graphics. 

• Finest quality double-dark glass and phosphor fields make the letters 
seem to be coming out of black space. 




LSI SYSTEMS SofM//ewTM CRT's: 

D #GN42 Green Phosphor $79.95 

□ #GN42G Green Phosphor with anti-glare $89.95 

D #OR34 Orange Phosphor $89.95 

D #OR34G Orange Phosphor with anti-glare $99.95 

ADD $7 FOR PACKAGING AND UPS SHIPPING. 



^. •:%Lansley-St.Clair toi 

• . . . 1 c 



Order Call: 

instrumentation 1-800-221-7070 

Systems, Inc. Or ask your Local Dealer. 
New York, N.Y. 10011 212-989-6876 

BM, APPLE Computer 



132 West 24th Street 

•IBM', APPLE* and TRS-80* are trademarks of 

& TANDY Corp. 



SoftSide 



]J 111 



TRS-80' 



Reviewed by J. B. Harrell, III 



PASCAL-80 

An Excellent 
A Iternative 



from New Classics Software, 239 Fox Hill Road, Denville, 
NJ 07834. System requirements: TRS-80® Model I or III 
with 48K memory and one disk drive. Suggested retail 
price: $99.00/disk. 

Over the several years that I have been involved in com- 
puters, I have seen the development of many computer 
languages to ease the programmer's burden. Languages 
such as FORTRAN and COBOL were developed and 
evolved into the early "work-horses" of the computer 
society. During this formative era, BASIC was originally 
devised as a "quick-and-easy" language for both student 
and teacher alike. 

No language has ever approached the easy, friendly, and 
interactive nature of BASIC until Pascal-80 was 
developed. Essentially every compiler currently on the 
market for the TRS-80 requires extensive disk access to 
edit, compile, and run a program. Repeated compilations 
and trial runs during program development cause the pro- 
grammer to lose time just moving among the system 
modules to change and recompile his program. 

Pascal is a fully structured language that has been 
developed for a wide range of computers, from the largest 
mainframes to micro-computers. Several versions are now 
available for the TRS-80, but most require the CP/M 
(Control Program for Microcomputers) operating system 



and cost hundreds of dollars. Many of these have limited 
features and appear to be a "force-fit" to make a 56K 
system fit into the TRS-80. 



Pascal-80 — System Overview 

The Pascal-80 system loads entirely into memory and 
provides many of the features of a BASIC interpreter. It 
allows you to edit, compile, and run programs rapidly with 
a few key-strokes from the system monitor. This simple 
ability removes much of the frustration that you would 
have with any other compiler system. 

The Pascal-80 system is supplied on a single-density, 35 
track disk for Model I users. This disk comes with TDOS 
(Tiny version of DOSPLUS) and is ready to operate when 
received. Pascal-80 is compatible with the popular current 
operating systems written for the TRS-80. AH you do is 
copy the file PASCAL/CMD (and any desired source code 
files) over to your current operating system disk. 

From the system monitor, you can easily execute any of 
the following commands (displayed in the system menu) 
using a single key-stroke: 

E - Enter full screen editor mode 

Q - Quit and return to the Disk Operating System 

K - Kill the current source file in memory 
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C - Compile and list code to video screen 

R - Run the program, compile it if necessary 

S - Save the source code to the named disk file 

L - Load source code file from disk file 

A - Append disk source code to in-memory text 

W - Write object code to disk, compile if necessary 

X - Execute object code from disk 

Once the Pascal-80 system is loaded into memory, you 
are left with a source program text buffer of approximately 
23K bytes. This will hold about 1,100 lines of source code, 
assuming an average Pascal line length of 20 bytes and the 
text-compression techniques used in Pascal-80. Note that 
source programs are not limited by the text buffer size but 
by the object p-code work space. This is because the source 
program may be developed in several segments and com- 
piled from the disk by using the INCLUDE facility of the 
compiler. 

Use of the in-memory text buffer accounts for the high 
compilation rate for Pascal-80. Using a standard TRS-80 
Model I (1.77 MHz clock), I clocked an average compila- 
tion rate of 1,000 lines per minute listing to the video 
screen and 1,500 lines per minute with screen listing 
secured. Compiling from the disk using the INCLUDE op- 
tion slows the compiler down considerably, as it is limited 
by the disk operating system data transfer rate. 



to BASIC 



• Next page (15 lines) of source code 

• Open the Une one space at the current cursor location 

• Previous page of source code 

• Quit and return to monitor menu 

• Top of source code text workspace 

• Write source code workspace to the line printer 



The System Editor 

The text editor used by the Pascal-80 system is a full- 
screen text editor invoked from the monitor. Fifteen lines 
of source code are displayed on the video screen at one 
time, and the non-destructive cursor is moved on the 
screen by the arrow keys. Unlike many text editors, each 
Une is separate and may be no more than 64 characters 
long. Text lines and corrections to them are permanently 
stored in the text workspace only after ENTER has been 
pressed. One very nice feature of the editor is the auto-tab 
function which allows easy formatting of Pascal source 
code with proper indentation. 

The editor commands are invoked by the control key se- 
quence of SHIFT DOWN-ARROW plus the first letter of 
the command. The editor command menu is displayed on 
the bottom line of the video screen by pressing BREAK. 
The following editor commands are allowed: 

• Block move source code 

• Cancel all changes in the current line 

• Delete the character at the current cursor location 

• Erase the current line from the workspace 

• Format control toggle for automatic tab feature 

• Line insert one blank line at the current cursor 



The System Compiler 

The Pascal-80 compiler implements a subset of Standard 
Pascal with several extensions. It is a one-pass compiler 
which generates Pascal pseudo code (p-code). Since the 
p-code must be executed by an interpreter, Pascal-80 will 
run somewhat slower than a system which generates the 
native machine code for the processor. 

The reference manual that accompanies the disk is a 
description of the limitations and extensions of the im- 
plementation of Pascal sold by New Classics Software. It is 
not a tutorial for the Pascal language nor does it provide 
any extensive programming examples. If you desire addi- 
tional knowledge, purchase a tutorial text such as Pro- 
gramming in PASCAL by Peter Grogono (Revised Edi- 
tion, Reading, MA: Addison-Wesley, 1980). This book 
provides an excellent description of the standard im- 
plementation of Pascal and uses in-depth examples where 
applicable. 

Many extensions have been added to the Pascal-80 com- 
piler. The most important additions are the ability to "in- 
clude" source text from a disk file in the current program 
being compiled, plus graphics and randomizing functions. 
Judicious use of the powerful INCLUDE facility allows 
you to create a source program much larger than the 
capability of the text buffer and then compile it from the 
disk. This allows the maximum available space for the 
generated p-code. The complete list of extensions is 
presented below: 

• Arrays of characters may be printed using a single 
WRITE statement. This somewhat makes up for the 
absence of true STRINGs. 

• The procedures READ and WRITE may be used with 
non-text files in place of the missing procedures GET and 
PUT (see limitations listed below). 

When using string constants in an assignment statement 
and in logical comparisons with character arrays, the con- 
stant on the right of the assignment operator or the logical 
operator may be shorter than the item on the left. It will be 
padded with blanks as necessary to make the length of the 
two strings equal. If the variable STRING is defined to be 
of type ARRAY(.1..10.) OF CHAR then STRING: = 
"NAME" is a vaUd assignment statement and STRING 
"NA" is a valid logical comparison and will evaluate to 
TRUE. The string constant must have at least two 
characters to be considered a string and not a single 
character. 

• REAL variables have 14 digits of precision and require 
8 bytes to store. REAL6 have six digits of precision and re- 
quire four bytes to store. No time is saved, since all 
calculations are double-precision. REAL6 variables have 
other usage limitations, and are best saved for situations 
where space is critical. 

• The program name may be omitted from the PRO- 
GRAM header statement. In addition, none of the stan- 
dard file designators (INPUT and OUTPUT) are required 
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declared in the PROGRAM header. These files are always 
available, as is the file LP for line printer output. INPUT, 
OUTPUT and LP are declared to be type "FILE OF 
TEXT". 

The following intrinsic procedures and functions are 
added to those implemented in the standard definition of 
the language: 

1. CALL(address,value) — type INTEGER function 
which places an 8-bit value in the Z-80's A-register and 
calls the routine located at address. The function's return 
value is the 8-bit value left in the A-register when the Z-80 
return instruction is executed from the routine called. 

2. CLOSE — close all open disk files. 

3. CLS — clear the video screen. 

4. EX(real-expression) — type INTEGER function 
which returns the exponent of the numerical result of 
evaluating the real-expression. For example, EX(10. 
1234) = 2. 

5. FP(real-expression) — type REAL function which 
returns a real value in the range of to 1 corresponding to 
the mantissa of the real-expression as its function value. 
For example, FP{10. 1234) = 0.101234. 

6. INKEY — type CHAR function which returns as its 
function value the 8-bit value of the keyboard. CHR(O) is 
returned if no key is pressed. This is identical to the opera- 
tion of the BASIC INKEY$ function. 

7. MEM — type INTEGER function returning the value 
corresponding to the amount of free memory available. 

8. PEEK(address) — type INTEGER function returning 
the 8-bit value from memory at address as its function 
value. 

9. POKE(address,value) — normally, a procedure to 
place the 8-bit value in memory at address. This procedure 
has been extended to provide rapid access to the TRS-80 
graphics capability. If address is in the range of to 127, 
then a SET operation is performed interpreting address as 
the X coordinate and value as the y coordinate of the pixel. 
If address is in the range of 128 to 255, then a RESET 
operation is performed at the pixel defined by 
(address-128, value). If address is in the range of 256 to 
383, then the pixel at the pixel defined by {address-256, 
value) is tested and location 21458 is set non-zero to reflect 
that the pixel is set, zero otherwise. 

10. SEEK(expression, filename) — procedure to position 
the file specified by filename to the record in the file 
pointed to by the integer part of expression. 

A compile-time function allows you to INCLUDE 
source code in the current program from the disk by speci- 
fying the filename of the source file as follows: (*$ 
filename *). Source code is compiled into the program at 
the location of the INCLUDE statement. 

The CASE statement has two extensions from Standard 
Pascal: 1) An optional ELSE clause may be specified and 
will be executed if none of the specified conditions are 
satisfied. 2) If the ELSE clause is not specified and none of 
the CASE conditions are satisfied, execution flows to the 
next executable statement rather than raising an error 
condition. 

The most significant Umitations of the Pascal-80 com- 
piler appear to be the omission of pointer variables, 
variant records, and the operators for direct manipulation 
of the "heap" such as NEW and DISPOSE. Listed below 
are the deviations from standard Pascal implementation: 
• Variant records are not implemented. 



• WITH ... DO is not implemented. 

• Pointer variables, including NEW and DISPOSE, are 
not implemented. 

• File window (buffer) variables, including GET and 
PUT, are not implemented. 

• PACK and UNPACK are not implemented. All data 
structures are already allocated based on the byte data 
structure of TRS-80 memory. 

• PAGE is not implemented, but WRITE(LP,CHR(12)) 
works the same. 

• Structures of files (i.e., ARRAY OF FILE, etc.) are not 
implemented. 

• Sets are limited to 256 members and numeric elements 
must be in the range of to 255. 

• A procedure or function identifier may not be passed as 
a parameter. 

• No expression passed as a value parameter to a pro- 
cedure or function may exceed 510 bytes unless it is passed 
as a VAR parameter. 

• Integer variables used to reference array elements in a 
record must be global variables. 

• Model I users may use "(." for the left bracket and 
".)" for the right bracket. 

• Spaces are significant in some isolated cases where they 
would not be significant in Standard Pascal. 



Additional Features 

The Pascal-80 master diskette contains source code for 
INCLUDE procedures to Unk to the graphics capabilities, 
random numbers, and position the video cursor. Several 
demonstration programs are included to illustrate features 
of the language. 

Two utility programs are provided for manipulation of 
Pascal-80 source code files. Due to the internal space- 
compression algorithm, Pascal-80 source code files are not 
compatible with any other ASCII file processors (such as 
Scripsit or Electric Pencil). The file ASCII/CMD will read 
a Pascal-80 file and write a standard ASCII character file 
from the compressed source code, terminating each line 
with the character ODH. The second file, TEXT/CMD, 
reads an ASCII file and converts it to the proper com- 
pressed mode for use by Pascal-80. I find that the editor in 
Pascal-80 is not powerful enough to meet all demands. 
These programs allow you to use any of the powerful word 
processors currently sold to edit the source code. One note: 
Electric Pencil requires that the ASCII file end with a OOH 
byte. 

The remaining files, AUTHOR/SRC and AUTH 
CODE/CMD, provide you with the capability to convert 
any Pascal-80 source program into a CMD file which will 
execute directly from the "DOS READY" prompt. No 
royalty fee is required! New Classics Software grants a 
license to all registered owners of Pascal-80 to distribute 
any compiled program provided that you meet the very le- 
nient requirements specified in the Pascal-80 User's 
Manual. A minimal Pascal program of just a BEGIN END 
block requires 9 granules of disk space as a CMD file due 
to the size of the p-code interpreter. Do not be too dis- 
tressed by this size until you compare this to the space re- 
quired by the program in Figure 1 (10 granules) as opposed 
to the same program compiled using FORTRAN (12 
granules)! 
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Conclusion 



I have attempted to portray Pascal-80 for what it is — 
the first real attempt to provide a useful implementation of 
this powerful and popular language for the TRS-80 at a 
reasonable price. Pascal is not for everyone. If your ap- 
plications require speed and a need for a high-level 
language, then FORTRAN is a much better choice. 
Pascal-80 is not slow, but the use of an interpreter makes it 
slower than native Z-80 machine code. If ease in program- 
ming using the elegance of a well-structured language in a 
friendly, interactive environment is your objective, then 
buy Pascal-80. 

Mr. Blank and Mr. Koch have done a great job of im- 
proving the superlative system written by Mr. Gates. With 
the support demonstrated by New Classics Software, it 
would not surprise me to see a derivative of Pascal-80 sup- 
plant BASIC as the language of the future. © 

Figure 1 



prograi PRIME; 




(iBenctiiarf:: prograi taken froi ""A High-level 


Language 


Benchtark" by Jia 6ilbreath in BYTE, Sept 


1981, 


page 182 1) 




const 




5i2e = 8190; 




var 




flags ; array(. Csize .) of boolean; 




i, priae, k. count, iter : integer; 




begin 




Hritelni'l iteration'); 




for iter := 1 to 1 do 




begin 




count := 0; 




for i := to size do 




flags!.!.) := true; 




for i := to size do 




if flags!. i.) 




then 




begin 




prise != i + i + 3; 




k := i + priie; 




while k <= size do 




begin 




flags!. k.) := false; 




k := k + priie 




end; 




count := count + 1; 




«rite!priffle:8) 




end 




end; 




sriteln; 




«ritBln!count,' priaes') 




end. 






DISK DRIVE WOES? ^-.^.Pat #4,259,705 

PRINTER INTERACTION? 

MEMORY LOSS? 

ERRATIC OPERATION? ^ IVTVl^B isoi 

Don't 

Blame The 
Software! 3,, 

Power Line Spikes, Surges & 

Hash could be the culprit! Floppies, printers, 

nnennory 8. processor often Interact! Our patented ISOLATORS 

eliminate equipment Interaction AND curb damaging Power Line 

Spikes, Surges and Hash. MONEY BACK GUARANTEE! 

• ISOLATOR (ISO-1) 3 filter Isolated 3-prong sockets; Integral 
Surge/Spike Suppression; 1875 W Maximum load, 1 Kw load 
any socket $69.95 

• ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; (6 
sockets total); Integral Spike/Surge Suppression; 1875 W Max 
load, 1 KW either bank '. $69.95 

• SUPER ISOLATOR (ISO-3) similar to iSO-1 except double 
isolation & Suppression $104.95 

• SUPER ISOLATOR (ISO-11) similar to ISO-2 except double 
isolation & Suppression $104.95 

• MAGNUM ISOLATOR (ISO-17) 4 Quad Isolated sockets; For 
ULTRA-SENSITIVE Systems $181.95 

• CIRCUIT BREAKER, any model (Add-CB) Add $9.00 

• REMOTE SWITCH, any model (Add-RS) Add $16.00 

AT YOUR MasterCard, Visa, American Express 

DEALERS ORDER TOLL FREE 1-800-225-4876 

(except AK, HI, PR & Canada) 



JS7 Electronic Specialists, Inc. 

171 South Main Street, Box 389, Natick, Mass. 01760 
(617) 655-1532 



NEW CLASSICS SOFTWARE 
1 ClSCcll^OU Phelps Gates 

This friendly, easy to use version of Standard Pasca!, as 
reviewed in the December 1981 Byte, is now even better! 
New version works on TRS-80 Model I and Model III, under 
TRS-DOS, NewDOS, NewDOS 80, DOSPlus, LDOS, and 
DoubleDOS. An author package allows you to create your 
own /CMD files without any royalty payments! Upper and 
lower case is fully supported. You can protect memory and 
call machine language programs. New extensions include 
SET, RESET, POINT, RND, and the UCSD Include procedure. 
Utilities are provided to convert to and from ASCII files. 
Pascal 80 now comes in a binder with an 80 page manual by 
George Blank. 

With monitor, editor, and compiler in memory at the same 
time, no other Pascal is easier to learn! One college found 
that it could teach half again as many students on the same 
number of computers after switching from UCSD Pascal to 
Pascal 80. 

Full 14 digit accuracy on all math functions, including log 
and trig functions, makes this a serious Pascal. Disk file 
handling is supported, with a mail list program included as 
a demonstration. 

Upgrades are available for those who bought Ramware 
Pascal 80. Call or write for information. 

Send $101 (includes shipping) to: New Classic Software 

.^^. ^^^^ ^S^k 23^ f "^ f^'W Road, Box S 

mSm mSim %Om Denville, N} 07834 

Credit card orders: (201)625-8838 

(PASCAL-80 docs not implement variant records, pointer and window variables, 
or functions and procedures used as paramciers.) 
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A Corner For Your Computer 

JOHN JAMES FURNISHINGS 

9015-A Meadow Vista Boulevard 
Houston, TX 77(W4 
(713) 469-4508 

Are your computer and assorted 
peripherals threatening to overun your 
household? Comp-U-Corner™ util- 
izes normally wasted corner space, 
enabling the user to have a home com- 
puter center without having to dedicate 
an entire room to it. 



Comp-L-Conn-i Icauiio- .i choice ot 
wood finishes and laminates, printer 
paper slots, adjustable shelves and a five 
year guarantee. There are also many op- 
tions available — a drawer conversion 
kit, a mounted surge protector/outlet 
run, and the Cable Roundup®, which 
organizes the many wires required by to- 
day's equipment. As the need arises for 
more work and storage space, additional 
components provide limitless oppor- 
tunities to customize your electronic en- 
vironment, and are easily added to the 
basic package. The price of the Comp- 
U-Corner is $475.00. 




Play Cards With Your Apple™ 

SOFT IMAGES ^ 

200 Route 17 ^ 

Mahwah, NJ 07430 
(201) 529-1440 

Singles' Night At Molly's consists of 
two challenging solitaire card games — 
Royal Flush and Sly Fox. Both games 
feature Hi-Res graphics and various dif- 
ficulty levels requiring a considerable 
amount of strategy and playing skill. No 
matter how many times either game is 
played, no two games will ever be exactly 
alike. Games can be played by one per- 
son, or any number of players. 

The Singles' Night package includes a 
diskette and a 28 page instruction 
booklet. It requires a 48K Apple II or II 
Plus with Applesoft in ROM or a 
Language Card and DOS 3.3. It is priced 
at $29.95. 



New Text On Microsoft 
BASIC 



DILITHIUM PRESS 

11000 S.W. 11th Street 
Suite E 

Beaverton, OR 97005 
(503) 646-2713 

MICROSOFT BASIC, 2nd Edition by 
Ken Knecht starts with an introduction 
to programming in BASIC, and a 
glossary of the computer terms that are 
used throughout the book. Knecht then 
covers such important topics as branch- 
ing and loops, arithmetic in BASIC, 
strings, editing, arrays and files, the disk 
and additional useful features. 

This book describes the latest version 
of Microsoft BASIC, release 5.0. While 
this version of BASIC-80 is the newest 
version of Microsoft BASIC, some 
popular microcomputers may use a 
slightly different version. Differences, 
however, are small, and easily changed 
by adaptations shown in the book. 

MICROSOFT BASIC, 2nd Edition 
requires only a basic understanding of 
computer fundamentals. Through ex- 
amples that actually run, the reader is 
shown how this powerful version of 
BASIC can save valuable programming 
time and effort. The book is available 
for $14.95. 



New Speed For Your Apple 

DIVERSIFIED SOFTWARE ah 

RESEARCH, INC. ^ 

5848 Crampton Court 
Rockford, IL 61111 

(815) 877-1343 

Diversi-DOS is a new Apple DOS 3.3 
compatible operating system for the Ap- 
ple computer. It loads and saves BASIC, 
Binary, and Text files two to five times 
faster than standard DOS 3.3. All DOS 
commands, including INIT, are pre- 
served. In addition, two utility programs 
are included. The keyboard buffer util- 
ity allows rapid typing without missing 
characters, even during disk operations. 
The print buffer utility temporarily saves 
characters on a standard 16K RAM card 
until the printer is ready. A simple, 
menu-driven, installation program is in- 
cluded on the unprotected disk. 

Diversi-DOS requires a 48K Apple II 
or II Plus with DOS 3.3, and may be 
ordered directly from Diversified Soft- 
ware Research for $30.(X). 
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^Versacomputing inc. 




The Micro 

Computer Graphics 

Company 
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Graphics For The IBM® PC 



VERSA COMPUTING, INC. !=■== 

3541 Old Conejo Road 

Suite 104 

Newbury Park, CA 91320 

(805) 498-1956 

The Versa Writer Drawing Tablet 
plugs directly into the IBM PC Game 
Control Adapter's connector and allows 
immediate entry of graphics to the IBM 
PC 320 X 200 and 640 x 200 screens. No 
expansion slot space is required. Over 30 
graphics commands and more than 100 
color options are available. Graphics 
produced with the Versa Writer can be 
saved on disk, and printed as hardcopy 
to an Epson MX80 FT Printer. 

The Versa Writer Drawing Tablet is 
available now at a retail price of 
$299.00. 



New Logo Newsletter 
Available 

THE NATIONAL LOGO 
EXCHANGE 
Attn: KTL 
Box 5341 
Charlottesville, VA 22905 

The National LOGO Exchange is a 
monthly newsletter providing teachers 
with practical suggestions for imple- 
menting LOGO in the classroom. 
Published September through May, it 
serves as a forum for the exchange of 
ideas, philosophies, and techniques of 
teaching and using LOGO. Columns by 
well-known professional educators are 
featured each month, as well as practical 
articles submitted by subscribers. 

The National LOGO Exchange is 
available for $25.00/year in the U.S., 
and $30.00 elsewhere. 



TRS-80® Disk Management 

System LJ 

HEXAGON SYSTEMS 
P.O. Box 397, Station A 
Vancouver, B.C. Canada V6C 2N2 
(604) 682-7646 

HEXMAN performs disk manage- 
ment chores that previously had to be 
done manually. It consists of a series of 
interlinked programs with an easy-to-use 
menu of functions. 

HEXMAN does automatic daily 
backups of amended files, detects the 
creation of new files, automatically 
catalogs them in its file index, and will 
retrieve and load a file or group of files 
as needed. 

HEXMAN requires a 48K TRS-80 
Model I or III with two disk drives and 
the LDOS Operating System. It is 
available from Hexagon Systems for 
$169.00. 



TRS-80® C-Language U 
Compiler 

MISOSYS 
P.O. Box 4848 
Alexandria, VA 22303 
(703) 960-2998 

LC is a C-language compiler for the 
TRS-80 Model I/III. It is an integer-only 
compiler that supports all statements ex- 
cept "struct", "union", and "type- 
def". LC supports all operators except 
"- ", ".", "sizeof", and "type- 
name' ' . 



LC supports I/O redirection, com- 
mand line arguments, dynamic memory 
management, and sequential files for 
read, write, and append. Floating point 
routines in ROM are accessible via func- 
tion calls supported in FP/LIB. An ex- 
tensive installation library supports 
graphics routines, string routines, DOS 
calls, port I/O, and more. LC generates 
ROMable Z-80 assembler source code 
compatible with ED AS IV. 

LC requires a TRS-80 Model I or III 
with two disk drives and LDOS 5.1.x. It 
comes with more than 200 pages of 
documentation and is priced at $175, 
plus $4 shipping. 




Enjoy Sports In Space On 
Your ATARI® Jk 



GAMMA SOFTWARE 
P.O. Box 25625 
Los Angeles, CA 90025 
(213) 473-7441 

Space BowF^ is a high speed Atari 
computer game which introduces a new 
genre — a combination space game and 
sports game. 

Imagine a championship sporting 
event for a species of extraterrestrials 
called Denebs. The field of battle is 
black space. Goals orbit the field and 
serve as moving targets for the fierce 
play action. The Denebs undergo rein- 
carnation when zapped by lasers, and 
can make themselves invisible, making 
Space Bowl unlike any sporting event 
on earth. 

Space Bowl is for two players and re- 
quires an Atari 400/800 with 16K RAM. 
It is available on both cassette and disk 
for a retail price of $29.95. 



Sut)inissii)n.>. may he seni lo: 
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Where To Buy SoftSide. 



On this and the next few pages you'll 
find over 1,000 retail stores — computer 
shops and book stores — that sell Soft- 
Side Magazine each month. And the list 
gets longer with each Issue we publish. 

We Invite you to patronize these fine 
stores for all your computer product 
needs...includlng SoftSide Magazine. 

And, if you would like to become a 
SoftSide dealer, call Kathie Maloof, 
(603) 673-0585, for information. 



ALASKA 




B Dalton Books 


Anchorage 


Walden Books 


Anchorage 


ALABAMA 




Anderson Computers 


Huntsvllle 


8 Dalton Bookseller 


Birmingham 


Madison Books 


Madison 


Olonsky Brothers 


Mobile 


Trade N Books 


Montgomery 


Village Green Bookstore 


Gardendale 


ARIZONA 




All Systems Go 


Tempe 


B Dalton Bookseller 


Phoenix 


B Dalton Bookseller 


Tucson 


B Dalton Bookseller 


Flagstaff 


B Dalton Bookseller 


Little Rook 


B Dalton Bookseller 


Fayetteville 


Computer Mart 


Phoenix 


Computerland Tempe Mesa 


Mesa 


Copper State Cash Register 


Phoenix 


Expotek 


Phoenix 


Heathkit Electric Center 


Phoenix 


Personal Computer Place 


Mesa 


Royal Bookstore 


Phoenix 


Walden Books 


Phoenix 


Walden Books 


Mesa 


Walden Books 


Scottsdaie 


Walden Books 


Tucson 


ARKANSAS 

B Dalton Bookseller 


Little Rook 


B Dalton Bookseller 


Lafayette 


Bits N Bytes 


Fort Smith 


Publishers Bookshop 


Little Rock 


Vaughn Electronics Corp 


Rogers 


Walden Books 


North Little Rock 


CALIFORNIA 




A Clean Well Lighted Place 


Cupertino 


Apple of Orange 


Orange 


Atari Service Center 


La Mesa 


Avenue Books 


Stockton 


B Dalton Bookseller 


Hollywood 


B Dalton Bookseller 


Los Angeles 


B Dalton Bookseller 


Rolling Hills 


B Dalton Bookseller 


Santa Monica 


B Dalton Bookseller 


Whittier 


B Dalton Bookseller 


Carson 


B Dalton Bookseller 


Northridge 


B Dalton Bookseller 


N Hollywood 


B Dalton Bookseller 


Carlsbad 


B Dalton Bookseller 


Manhatt Beach 


B Dalton Bookseller 


Indio 


B Dalton Bookseller 


Costa Mesa 


B Dalton Bookseller 


El Toro 


B Dalton Bookseller 


Westminster 


B Dalton Bookseller 


Mission Viejo 


B Dalton Bookseller 


Oxnard 


B Dalton Bookseller 


Santa Barbara 


B Dalton Bookseller 


Visalla 


B Dalton Bookseller 


Lancaster 


B Dalton Bookseller 


Fresno 


B Dalton Bookseller 


Salinas 


B Dalton Bookseller 


Pacific Gr 


B Dalton Bookseller 


Mountain View 


B Dalton Bookseller 


Sunnyvale 


B Dalton Bookseller 


Walnut Creek 


B Dalton Bookseller 


Cupertino 


B Dalton Bookseller 


Sacramento 


B Dalton Bookseller 


Redding 


Bay Co Books 


Santa Cruz 


Byte Shop Computer Store 


Citrus Heights 


Capital Computer Systems 


Sacramento 


Computer Age Inc. 


San Diego 


Computer Emporium 


San Jose 


Computer Mart 


Diamond Bar 


Computer Palace 


Giendaie 



Computer Post 

Computer Store 

Computer Wave, inc. 

Computerland Fresno 

Computerland Newhall 

Computerland of Laguna hiiils 

Computerland of South Bay 

Computerland of West LA. 

Computerland Sacramento 

Computerland San Bernardino 

Computerland San Diego 

Computerland San Leandro 

Computerland San Maria 

Computerland Santa Barbara 

Computerland Stockton 

Computerland Thousand Oaks 

Computerland Woodland Hills 

Computertlme 

Dimensional Software 

3-E Software 

Family Computing, inc. 

Futurevlslon 

Game Gallery 

Harding Way News 

Leavlty Distributors 

Mallbu Microcomputing 

Micro Age Computer Store 

National Computer Center 

Net Profit Computers 

On Line Computer Center 

On Line Micro Center 

Opamp Technical Books 

Paradise Computer Systems 

PC Computers 

Printers Ink Bookstore 

Quement Electronics 

Rainbow Computing 

Software Center 

Software Center 

Software Central 

Software City 

Software Emporium 

Software Plus 

Software Store 

Sunset Computers 

Tower Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 



Newark 

Santa Monica 

Westminster 

Fresno 

Newhall 

Laguna Hills 

Lawn Dale 

W Los Angeles 

Sacramento 

San Bernardino 

San Diego 

Hayward 

San Maria 

Santa Barbara 

Stockton 

Thousand Oaks 

Woodland Hills 

Citrus Heights 

San Diego 

Hayward 

Enclnltas 

Napa 

Carmel 

Stockton 

N Hollywood 

Mallbu 

Mountainview 

Fresno 

Anaheim 

Sacramento 

Fresno 

Los Angeles 

San Luis Obispo 

El Cerrito 

Palo Alto 

San Jose 

Northridge 

San Francisco 

Santa Ana 

Pasadena 

San Jose 

Los Altos 

Citrus Heights 

Los Angeles 

San Francisco 

Sacramento 

Los Angeles 

Culver City 

Downey 

Santa Monica 

Torrance 

Buena Park 

Cerrltos 

Lakewood 

Pasadena 

Giendaie 

Canoga Park 

Northridge 

Thousand Oaks 

Woodland Hills 

Panorama City 

Sherman Oaks 

City of industry 

Upland 

West Covlna 

Chuia Vista 

El Cajon 

National City 

San Diego 

Hemet 

San Bernadino 

Brea 

Huntington Beach 

Laguna Hills 

Westminster 

Mission VIeio 

Anaheim 

Ventura 

Salinas 

Monterey 

Burlington 

Mountainview 

San Bruno 

San Francisco 

Palo Alto 

San Mateo 

Concord 

El Cerrito 

Fairfield 

Fremont 

Hayward 

Newark 

San Leandro 



Walden Books 


Berkeley 


Walden Books 


San Rafael 


Walden Books 


Cupertino 


Walden Books 


San Jose 


Walden Books 


Modesto 


Walden Books 


Santa Rosa 


Walden Books 


Citrus Heights 


Walden Books 


Sacramento 


Zackit Electronics 


Monterey 


COLORADO 




B Dalton Bookseller 


Aurora 


B Dalton Bookseller 


Littleton 


B Dalton Bookseller 


Denver 


B Dalton Bookseller 


Boulder 


B Dalton Bookseller 


Ft. Collins 


B Dalton Bookseller 


Grand Junction 


Video World 


Englewood 


Walden Books 


Aurora 


Walden Books 


Westminster 


Walden Books 


Littleton 


Walden Books 


Denver 


Walden Books 


Ft. Collins 


Walden Books 


Colorado Springs 


Walden Books 


Pueblo 


Wholeilfe Distributors 


Denver 


CONNECTICUT 




Aetna Life Club Store 


Hartford 


B Dalton Bookseller 


Bioomfield 


B Dalton Bookseller 


Farmlngton 


B Dalton Bookseller 


Westport 


Computer Center 


Old Saybrook 


Computerlfios 


E. Hartford 


Computerworks 


Westport 


Marks Stationary Store 


Greenwich 


Walden Books 


Enfield 


Walden Books 


Hartford 


Walden Books 


Wllilmantic 


Walden Books 


Ansonia 


Walden Books 


Merlden 


Walden Books 


Southbury 


Walden Books 


New Haven 


Walden Books 


Bridgeport 


Waiden Books 


Trumbull 


Walden Books 


Waterbury 


Walden Books 


Danbury 


Walden Books 


Greenwich 


Walden Books 


Westport 


Walden Books 


Wilton 


Walden Books 


Stamford 


DELAWARE 




Micro Products 


Wilmington 


Walden Books 


Wilmington 


Walden Books 


Dover 


DISTRICT OF COLUMBIA 




Program Store 


DC 


Walden Books 


DC 


FLORIDA 




American/Software Tech inc. 


N. Bay Village 


B Dalton Bookseller 


Daytona Beach 


B Dalton Bookseller 


Tallahassee 


B Dalton Bookseller 


Panama City 


B Dalton Bookseller 


Pensacola 


B Dalton Bookseller 


Mary Esther 


B Dalton Bookseller 


Orlando 


B Dalton Bookseller 


Miami 


B Dalton Bookseller 


Boca Raton 


B Dalton Bookseller 


Pinellas Park 


B Dalton Bookseller 


Tampa 


B Dalton Bookseller 


Naples 


Book & Variety Store 


Selung 


Byte Shop of Miami 


Miami 


City News Stand 


Melbourne 


Clarks Out of Town News 


Ft. Lauderdale 


Computech 


Tallahassee 


Computer Haven inc. 


W. Melbourne 


Computer image 


Miami 


Computer Room 


W. Palm Beach 


Computer Scene 


Miami 


Computer Scene 


N. Miami Beach 


Computerland 


Boca Raton 


Computerland 


Clearwater 


Computerland Lakeland 


Lakeland 


Computerland Tallahassee 


Tallahassee 


Computerland W Palm Beach 


W. Palm Beach 


Corner Book Shop 


N. Miami Beach 


Extra Extra 


Tampa 


Goerings Book Center 


Gainesville 


Grlce Electronics 


Pensacola 


H.I.S. Computermatlon 


Melbourne 
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Home & Professional Comp. 


Miami 


Walden Books 


Northbrook 


IBARS Electronics Corp. 


HIaleah 


Walden Books 


Waukegan 


Ives Book Shop 


Fort Meyers 


Walden Books 


Dundee 


Lafayette Radio 


Ft. Lauderdale 


Walden Books 


Lombard 


Plaza Bookstore Inc. 


Hollywood 


Walden Books 


Villa Park 


Rainbow Computers 


Orlando 


Walden Books 


Schaumburg 


Rays Computer Center 


Clearwater 


Walden Books 


Jollet 


Software Store 


Tampa 


Walden Books 


Bolingbrook 


Sound Ideas Microcomputer 


Gainesville 


Walden Books 


Orland Park 


Sunnys At Sunset Inc. 


Sunrise 


Walden Books 


Park Forest 


Tfie Logical Cfiolce 


St. Petersburg 


Walden Books 


Aurora 


Walden Books 


Orange Park 


Walden Books 


North Riverside 


Walden Books 


Tallahassee 


Walden Books 


Chicago 


Walden Books 


Pensacola 


Walden Books 


Nlles 


Walden Books 


Gainesville 


Walden Books 


Sterling 


Walden Books 


Altamonte Springs 


Walden Books 


Rockford 


Walden Books 


Orlando 


Walden Books 


Moline 


Walden Books 


Merritt Island 


Walden Books 


Ottawa 


Walden Books 


HIaleah 


Walden Books 


Normal 


Walden Books 


Hollywood 


Walden Books 


Urbana 


Walden Books 


Miami 


Walden Books 


Mattoon 


Walden Books 


Fort Lauderdale 






Walden Books 


W. Palm Beach 


INDIANA 




Walden Books 


Bradenton 


A Computer Store 


Indianapolis 


Walden Books 


Clearwater 


B Daiton Bookseller 


Greenwood 


Walden Books 


Tampa 


B Daiton Bookseller 


Indianapolis 


Walden Books 


Fort Myers 


B Daiton Bookseller 


Ft. Wayne 






B Daiton Bookseller 


Bloomlngton 


QEORGIA 




B Daiton Bookseller 


Evansvllle 


Atlanta Computer Mart 


Atlanta 


B Daiton Bookseller 


Terre Haute 


B Oalton Bookseller 


Decatur 


Bauer Electronics 


Lawrenoeburg 


B Daiton Bookseller 


Atlanta 


Bytrex 


Ft. Wayne 


B Daiton Bookseller 


Augusta 


Computer Store 


Marlon 


Computerland Atfiens 


Athens 


Computerland 


Anderson 


Oxford Books Inc 


Atlanta 


Computerland 


Ft. Wayne 


Software-To-Boot 


Savannah 


Computerland Mishawaka 


Mishawaka 


The Bookstore 


Valdosta 


Computerland 


Indianapolis 


Walden Books 


Roswell 


Computerland Evansvllle 


Evansvllle 


Walden Books 


Atlanta 


Data Domain 


Bloomlngton 


Walden Books 


Athens 


Emprise Computer System 


Indianapolis 


Walden Books 


Augusta 


Game Preserve 


Indianapolis 


Walden Books 


Savannah 


Hoosler Electronics 


Terre Haute 


Walden Books 


Columbus 


Indiana News 


Indianapolis 


Walden Books 


Morrow 


Twin City News 


Lafayette 






Vons Bookshop 


W. Lafayette 


HAWAII 




Walden Books 


Indianapolis 


Walden Books 


Alea 


Walden Books 


Merrllivliie 


Walden Books 


Honolulu 


Waiden Books 


Mishawaka 






Walden Books 


South Bend 


IDAHO 




Walden Books 


Fort Wayne 


B Daiton Bookseller 


Idaho Falls 


Walden Books 


Kokomo 


B Daiton Bookseller 


Nampa 


Walden Books 


Evansvllle 


Bookpeople of Moscow Inc. 


Moscow 


Walden Books 


Terre Haute 


Idaho Peoples Computer Store 


Buhl 


Waiden Books 


Lafayette 


Pioneer Bookstore Inc. 


Idaho Falls 


IOWA 




Walden Books 


Chubbuck 




Walden Books 


Moscow 


B Daiton Bookseller 


Des Moines 






B Daiton Bookseller 


Mason City 


ILLINOIS 




B Daiton Bookseller 


Sioux City 


■ ■»■■■ Iw **■*# 

B Daiton Bookseller 


Waukegan 


B Daiton Bookseller 


Spencer 


B Daiton Bookseller 


Bloomlngdale 


B Daiton Bookseller 


Iowa City 


B Daiton Bookseller 


St. Charles 


B Daiton Bookseller 


Cedar Rapids 


B Daiton Bookseller 


Schaumburg 


B Daiton Bookseller 


Muscatine 


B Daiton Bookseller 


Champaign 


interstate Bookstore 


Davenport 


B Daiton Bookseller 


Springfield 


Memory Bank 


Bettendorf 


Complete Computing Corp. 
Computerland 


Lombard 
Champaign 


Waiden Books 
Waiden Books 


Ames 
Marshailtown 


Computerland 


Mundelln 


Walden Books 


West Des Moines 


Computerland 


Napervllle 


Walden Books 


Des Moines 


Computerland 


Schaumburg 


Walden Books 


Waterloo 


Computerland Arlington Heights 


Arlington Heights 


Walden Books 


Sioux City 


Computerland of Oakpark 
Computerland Peoria 


Oakpark 
Peoria 


Walden Books 
Waiden Books 


Dubuque 
Iowa City 


Data Domain 


Schaumburg 


Waiden Books 


Cedar Rapids 


DIgltalworld 


Addison 


Walden Books 


Davenport 


Godfrey Bookstore 


Godfrey 


KANSAS 




Krochs & Bretanos 


Chicago 


Amateur Radio Equipment 


Wichita 


Krochs & Bretanos 


Oak Park 


B Daiton Bookseller 


Overland Park 


Krochs & Bretanos 


Oakbrook 


B Daiton Bookseller 


Topeka 


Krochs & Bretanos 


Rockford 


B Daiton Bookseller 


Wichita 


Krochs & Bretanos 


Skokle 


Computerland 


Topeka 


LIbertyvllle Video & Computer 


LIbertyvllle 


Crossroads Inc. 


Hutchinson 


Midwest Microcomputers 


Lombard 


Micro Age Computer 


Sallna 


Nablh's Inc. 


Evanston 


Mr. Computer 


Emporia 


Oak Brook Computer Center 


Oak Brook 


Waiden Books 


Overland Park 


Prairie News Agency 


Chicago 


Waiden Books 


Wichita 


Shadlds Book Mart 


Springfield 






Taylors Book Shop 


Centraila 






The Computer Store/Rockford 


Rockford 


KENTUCKY 




TZ Computers 


Bloomlngton 


B Daiton Bookseller 


Florence 


Video Etc. 


Deerfield 


Computer Emporium 


Louisville 


VIdeomat 


Chicago 


Walden Books 


Louisville 


Walden Books 


Arlington Heights 


Waiden Books 


Lexington 



LOUISIANA 

B Daiton Bookseller 

B Daiton Bookseller 

Computerland/Louisiana 

Sidneys Newsstand Uptown 

The Book Shelf 

Walden Books 

Walden Books 

Walden Books 

Waiden Books 

Waiden Books 

Waiden Books 

Waiden Books 

MAINE 

B Daiton Bookseller 
Bookland of South Portland 
Harper Electronics 
Waiden Books 

MARYLAND 

B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
Book House 
Bowes Books 
Business Computer Center 
Chafltz 

Computer Age Inc. 
Computer Unlimited 
Greetings & Readings 
Layhill News Stand 
The Computer Forum 
Waiden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Waiden Books 
Waiden Books 
Waiden Books 

MASSACHUSETTS 

B Daiton Bookseller 

Computer/Source 

Custom Electronics Inc. 

NInIs Corner 

Norwood News & Bookshop 

Voyager Bookshop 

Waiden Books 

Walden Books 

Waiden Books 

Waiden Books 

Waiden Books 

Waiden Books 

Waiden Books 

Waiden Books 

Waiden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

MICHIGAN 

B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
B Daiton Bookseller 
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New Orleans 
Lafayette 
New Orleans 
New Orleans 
Slideil 
Metairle 
Gretna 
New Orleans 
Houma 
Lafayette 
Lake Charles 
Baton Rouge 

Bangor 

South Portland 
Portland 
South Portland 



Bethesda 

Galthersburg 

Kensington 

Cockeysvllie 

Columbia 

White Marsh 

Baltimore 

Annapolis 

Frederick 

Ocean City 

Lexington Park 

Eillooft City 

Rookvllle 

Sliver Springs 

Towson 

Towson 

Sliver Springs 

Severna Park 

Forestvllie 

Hiilcrest Heights 

Bethesda 

Laurel 

Kensington 

Wheaton 

Cockeysvllie 

Baltimore 

Parkviile 

Rosedaie 

Annapolis 

La Vale 

Frederick 

Hagerstown 

Framingham 

Plttsfieid 

Chloopee 

Cambridge 

Norwood 

Brockton 

Hadley 

Hoiyoke 

Auburn 

Andover 

Bllierica 

Methuen 

Saugus 

Swampsoott 

East Walpoie 

Boston 

Somervliie 

Medford 

Newton Centre 

Lexington 

Plymouth 

North Dartmouth 

Swansea 



Nov! 

Rochester 

Southfield 

Sterling Heights 

Troy 

Warren 

Ann Arbor 

Taylor 

Flint 

Essexvllle 

Okemos 

Lansing 

Portage 

Benton Harbor 

119 



8 Dalton Bookseller 


Houghton 


Walden Books 


Landover 


B Dalton Bookseller 


Flushing 


Binary Corp. 


Berkley 


Walden Books 


Belair 


B Dalton Bookseller 
B Dalton Bookseller 


Lake Grove 
Massapequa 


Book Lovers Shop 


Sterling Heights 


MONTANA 

B Dalton Bookseller 


Bozeman 


B Dalton Bookseller 
B Dalton Bookseller 


Glens Fails 

Clay 

Cheektowaga 


Book Nook 


Allen Park 


B Dalton Bookseller 


Missoula 


B Dalton Bookseller 


Computer Horizons 


Livonia 


Computerland Billings 


Billings 


B Dalton Bookseller 


Horseheads 


Computer Mart 


Ann Arbor 


Walden Books 


Billings 


BC Communications Inc. 


Huntington Station 


Computer Mart 
Computer Mart 
Computers And More 


E. Lansing 

Flint 

Grand Rapids 


Westgate News 
NEBRASKA 


Billings 


Castle Computers Inc. 
Computer Center 
Computer Emporium 


Latham 

Rochester 

Middletown 


Computerland 


Southfleld 


B Dalton Bookseller 


Omaha 


Computer Resource 

Computer Room Ltd. 

Computer System Spec Inc. 

Computer Tree Inc. 

Computerland 

Computerland of Ithaca 

Computers Etc. 

Compuworld 

Comtec 

Datascan Computer Systems 

DIgbytes 

Future Visions Computer 

Hurst Video/Village 

J & J Coins 

Little Professor Book Center 


Wllllamsville 


Computerland Grosse Pt. 


St. Clair Shores 


B Dalton Bookseller 


Lincoln 


Albany 

Wappingers Falls 

Endweil 

Messina 

Ithaca 

Dewitt 


Family Computer Center 
Heathkit Electronic 
Lyceum Microcomputers 
Merit Book Center 
Metro News Center 


Berkley 
Detroit 
Warren 
Detroit 
Birmingham 


Hatch Radio Shack 
Hobbytown 
2001 Inc. 
Micro Age 
Nebraska Bookstore 


Alliance 
Lincoln 
Norfolk 
Omaha 
Lincoln 


Micro Computer Diversified 
Micro Station 


Alma 
Southfleld 


Walden Books 
Walden Books 


Omaha 
Lincoln 


Rochester 
Brooklyn 
Farmingvliie 
New York 
Melville 

Massapequa Park 
Orchard Park 
Great Neck 


New Horizon Book Shop 
Northland Computer 
Paper Tiger 
Plymouth Book World 
Rainbow Computers 
Rochester Book Center 


Rosevllle 

Traverse City 

Livonia 

Plymouth 

Troy 

Rochester 


Walden Books 

NEVADA 

Century 23 
Computerland Reno 
Home Computers 


Grand Island 

Las Vegas 
Reno 
Las Vegas 


SImtec 

Thompson News 
TrI City Computer Mart 
Walden Books 


Birmingham 
Traverse City 
Saginaw 
Novl 


PCS Computers 
Walden Books 
Walden Books 


Las Vegas 
Las Vegas 
Reno 


Micro Age Computer Store 
Omnlfax Computer Store 
Parkway Video 


Rochester 

Syracuse 

Brooklyn 


Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 


Rochester 
Sterling Heights 
Ann Arbor 
Dearborn 
Detroit 
Saginaw 
Kalamazoo 
Grand Rapids 
Traverse City 


NEW HAMPSHIRE 

B Dalton Bookseller 
Computer Mart of NH 
Computer Shoppe 
Computer Town 


Manchester 
Merrimack 
Nashua 
Salem 


Software Emporium 
Software Supply Intl. 
Syosset Video & Electronics 
Tastos Video Fair 
The Computer Shoppe 
The Long Island Computer 


Roslyn Heights 

Niagara 

Syosset 

Brooklyn 

Patchogue 

Lynbrook 


Walden Books 
Walden Books 
Walden Books 


NEW JERSEY 

Apple Core Computer 
B Dalton Bookseller 


Basking Ridge 
Wayne 


Video Connection 
Village Green Bookstore 
Walden Books 
Walden Books 


Clifton 
Rochester 
Staten Island 
Portchester 


MINNESOTA 

B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 




B Dalton Bookseller 


Morrlstown 


Walden Books 


Scarsdale 


St. Paul 

Maplewood 

W St. Paul 

MInnetonka 

Minneapolis 

Golden Valley 

Brooklyn Center 

Edina 

Duluth 

Mankato 

St. Cloud 


B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
Computer Corner of NJ 
Computer Dimensions 
Computer Discount of NJ 
Computer Mart of NJ 
Computer Port 
Computerland Cherry Hill 
Computerland New Castle City 
Computerland of Morrlstown 


Moorestown 
Lawrenceviile 
Toms River 
Edison 

Pompton Plains 
Westfleld 
W Mliford 
Iseiln 
Northfleld 
Cherry Hill 
Newark 
Morrlstown 


Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 


White Plains 
Nanuet 
Manhasset 
Brooklyn Heights 
Brooklyn 
Forest Hills 
Cedarhurst 
Garden City 
Greenvale 
East Northport 
Massapequa 
L-uiriciirii 


B Dalton Bookseller 


Fergus Falls 


Earthrlse Computer Center 


Madison 


Walden Books 


Albany 






Felice's Follies 


Red Bank 


Walden Books 


Kingston 


Fine Print Inc. 


Northfleld 


Garden State News 


Fort Lee 


Walden Books 


FIshklil 


Read More Book Store 


Minneapolis 


Gemini 


Cedar Knolls 


Walden Books 


Poughkeepsle 


Schaak Electronics 


St. Cloud 


Micro Concepts 


Morris Plains 


Walden Books 


Fayettevllle 


Spectrum Computers 


Lathrup Village 


Midas Data Systems Inc. 


Marlton 


Walden Books 


Syracuse 


Walden Books 


Maplewood 


Software/Asylum 


Carteret 


Walden Books 


New Hartford 


Walden Books 


Rosevllle 


Software City 


Fairview 


Walden Books 


Utica 


Walden Books 


Surnsville 


Software City 


Montvale 


Walden Books 


Johnson City 


Walden Books 


Eden Prairie 


Software City 


Summit 


Walden Books 


Buffalo 


Walden Books 


Minneapolis 


Software City 


Teaneok 


Walden Books 


Wliliamsvlile 


Walden Books 


St. Louis Park 


Unicorn Book Store 


Hoboken 


Walden Books 


Cheektowaga 


Walden Books 


Blaine 


Vista Computers 


Matawan 


Walden Books 


Victor 


Walden Books 


Duluth 


Walden Books 


Livingston 


Walden Books 


Rochester 


Walden Books 


Rochester 


Walden Books 


Woodbrldge 


Walden Books 


Horseheads 


Wizard's Work 


New Hope 


Walden Books 


Wayne 


Walden Books 


Ithaca 


ZIm Computers 


Brooklyn Center 


Walden Books 
Walden Books 


Hac ken sack 
Eatontown 


World Wide Sales 


Rochester 


MISSISSIPPI 

Walden Books 
Walden Books 




Walden Books 


Rockaway 


NORTH CAROLINA 




Jackson 
Laurel 


Walden Books 
Walden Books 
Walden Books 


Voorhees 
Depfford 
Lawrenceviile 


B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 


Winston Salem 

Gary 

Raleigh 






Walden Books 


Toms River 


B Dalton Bookseller 


Durham 


MISSOURI 




Walden Books 


East Brunswick 


B Dalton Bookseller 


Rocky Mount 


B Dalton Bookseller 


Chesterfield 






B Dalton Bookseller 


Gastonia 


B Dalton Bookseller 


St. Louis 


NEW MEXICO 




B Dalton Bookseller 


Wilmington 
Asheville 


B Dalton Bookseller 


Creve Coeur 


B Dalton Bookseller 


Albuquerque 


B Dalton Bookseller 


B Dalton Bookseller 


Kansas City 


Computerland of Santa Fe 


Santa Fe 


Computer Alternatives 


Ashevllle 


B Dalton Bookseller 


Springfield 


Computer/Tech Assoc. 


Albuquerque 


Computer Room 


Charlotte 


Back To BASICS Computer 


Florissant 


East West Enterprises 


Albuquerque 


Computerland Charlotte 


Charlotte 


Computerland West City 


Manchester 


Micro Age Computer Store 


Albuquerque 


K & S Newsstand Inc. 


Winston Salem 


Cowley Distributing ; 


Jefferson City 


The Book Company 


Albuquerque 


North Carolina News Co. 


Durham 


Discount Books 


Webster 


Walden Books 


Albuquerque 


Walden Books 


Winston Salem 


Fredericks Computer Products 


Frederick 


Walden Books 


Las Cruces 


Walden Books 


Goldsboro 


House of Computer 


Blue Spring 






Walden Books 


Raleigh 


Instant Replay Ltd. 


Chesterfield 


NEW YORK 




Walden Books 


Durham 


Micro Age Computer 


St. Louis 


ASD Office Systems Computer 


Poughkeepsle 


Walden Books 


Concord 


Walden Books 


independence 


B Dalton Bookseller 


New York 


Walden Books 


Charlotte 


Walden Books 


Kansas City 


B Dalton Bookseller 


Yonkers 


Walden Books 


Fayettevllle 


Walden Books 


Jefferson City 


B Dalton Bookseller 


Great Neck 


Walden Books 


Kinston 


Walden Books 


Springfield 


B Dalton Bookseller 


New Hyde Park 


Walden Books 


Jacksonville 
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NORTH DAKOTA 



B Dalton Bookseller 


Fargo 


B Dalton Bookseller 


Grand Fork 


B Dalton Bookseller 


Bismarck 


Computerland Grand Fork 


Grand Fork 


Computerland Bismarck 


Bismarck 


OHIO 




Abacus Computer 


Cincinnati 


B Dalton Bookseller 


Columbus 


B Dalton Bookseller 


Toledo 


B Dalton Bookseller 


Northwood 


B Dalton Bookseller 


Cleveland Heights 


B Dalton Bookseller 


Beachwood 


B Dalton Bookseller 


Akron 


B Dalton Bookseller 


Niles 


B Dalton Bookseller 


Youngstown 


B Dalton Bookseller 


Tiffin 


B Dalton Bookseller 


Cincinnati 


B Dalton Bookseller 


Dayton 


Computerland Cleveland East 


Mayfleld Heights 


Computerland Warren 


Warren 


Data Link 


Dayton 


Eric Martins Inc. 


Maple Heights 


Fine Print Books 


Xenia 


Hudson Computers 


Hudson 


Jerrys Computer 


Cleveiand 


Micro Center 


Columbus 


Microconcepts 


Akron 


News Reader 


Hillsboro 


News Reader 


Falrborn 


Nortttcoast Computers 


Bay Village 


P.J.'s Bookstore 


Dayton 


Program Store 


Columbus 


The Computer Store 


N Canton 


The Home Computer Store 


Westerville 


The Ninth House Book Shoppe 


Brecksville 


The Open Book 


Tiffin 


The Open Book 


Toledo 


Video Computer World 


Oregon 


Video Depot 


Cleveiand 


Walden Books 


Columbus 


Walden Books 


Marlon 


Walden Books 


ZanesvMIe 


Walden Books 


Elyrla 


Walden Books 


Mentor 


Walden Books 


North Olmsted 


Walden Books 


Cleveland 


Walden Books 


Falrvlew 


Walden Books 


North Randall 


Walden Books 


Euclid 


Walden Books 


Akron 


Walden Books 


Nlles 


Walden Books 


Canton 


Walden Books 


Mansfield 


Walden Books 


Dayton 


Walden Books 


Springfield 


Wllkle News 


Dayton 


OKLAHOMA 




B Dalton Bookseller 


Norman 


B Dalton Bookseller 


Oklahoma City 


B Dalton Bookseller 


Tulsa 


Bartlesvllle Bookland 


Bartlesvllle 


Bettys Book Rack 


Bartlesvllle 


Caravan Books 


Stillwater 


Computerland of Oklahoma 


Oklahoma City 


Computers Plus 


Duncan 


Micro-corn Radio Shack 


Tonkana 


On Line Micro Centers 


Oklahoma City 


Steves Sundry Books 


Tulsa 


Walden Books 


Norman 


Walden Books 


Midwest City 


Walden Books 


Oklahoma City 


Walden Books 


Lawton 


Walden Books 


Tulsa 


Walts News & Bookstore 


Lawton 


OREGON 




B Dalton Bookseller 


Portland 


B Dalton Bookseller 


Salem 


B Dalton Bookseller 


Eugene 


Computer Solutions inc. 


Eugene 


Computer Specialties 


Salem 


Marketplace Bookstore 


Eugene 


Micro Age Portland 


Portland 


Norvac Electronics 


Beaverton 


Universal Video 


Oregon City 


Walden Books 


Portland 


Walden Books 


Salem 


Walden Books 


Eugene 



PENNSYLVANIA 

Abronovlck Assoc. Inc. 



Klttannlng 



AV Computer 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

Bookarama 

Bradd Alan Bookstore 

Central Wholesale 

City Software Center 

Computerland 

Computerland 

De Bug 

Doc's Computer Supply Ctr. 

Erie Computer Co. 

General Computer Store 

Global Books Inc. 

Integral Computer Service 

Newsy 

One Stop Computer Shop 

Pittsburgh Computer Store 

Second Childhood 

Star Gate 

Stevens Electronics 

Television Parts Co. 

The Computer Forum 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

RHODE ISLAND 

Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 

SOUTH CAROLINA 

B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
News Stand 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 

SOUTH DAKOTA 

B Dalton Bookseller 
B Dalton Bookseller 
Computer Terminal 
Computerland 
Computerland of Rapid City 
Walden Books 
Walden Books 
Walden Books 
Walden Books 

TENNESSEE 

B Dalton Bookseller 
B Dalton Bookseller 
Card N Book 
Computerland 
Computerland Of Memphis 
Educational Computing Sys. 
Tobacco Corner 

SoftSide 



Philadelphia 

W. Mifflin 

Monroevllle 

Pittsburgh 

Butler 

Meadvllle 

State College 

Camp Hill 

Carlisle 

Harrlsburg 

York 

Muncy 

Philadelphia 

Exton 

North Wales 

Plym. Mtg. 

Reading 

Bethlehem 

Philadelphia 

Pittsburgh 

Philadelphia 

Feasterville 

Paoll 

Indiana 

Ardmore 

Erie 

Allenstown 

Feasterville 

Rochester 

Philadelphia 

Leymore 

Pittsburgh 

Beaver Falls 

Mckeesport 

Phoenix 

New Brighton 

Frazer 

Monaca 

Pittsburgh 

Butler 

Hanover 

Muncy 

Sellngsgrove 

Pottsville 

Cornwells Heights 

Langhorne 

Media 

Philadelphia 

Center Square 

North Wales 

Plymouth Meeting 

Pottstown 

Reading 



Newport 

Lincoln 

Walefield 

Warwick 

Cranston 



Columbia 

Spartanburg 

Charleston 

Greenville 

Clemson 

Sumter 

Columbia 

North Charleston 

Charleston 

Greenville 

Greenwood 



Sioux Falls 
Rapid City 
Sioux Falls 
Sioux Falls 
Rapid City 
Brookings 
Sioux Falls 
Huron 
Pierre 



Kingston 

Memphis 

Nashville 

Kingston 

Memphis 

Oak Ridge 

Memphis 



Walden Books 



TEXAS 

Austin News Agency 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

B Dalton Bookseller 

Baps 

Books, Etc. 

Century Bookstore 

Compushop Inc. 

Computer Tech Associates 

Computerland Brownsville 

Computerland Houston Bay 

Computerland of Dallas 

Computerland of Tyler 

Computerland SO W Houston 

Computers To Go 

Congress Avenue Booksellers 

Dabney's Bookland 

Expensive Toys For Big Boys 

Fultz News Agency 

Homing Pigeon 

Lone Star News 

M - 6 Distributing 

Micro Age Computers 

R L Coles Computer Ctr. 

SImtec 

Software Concepts 

Softwares 

Total Computer Store 

Twig Bookshop 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Walden Books 

Westheimer Newstand 



UTAH 

B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
Personal/Business Comp. inc. 
Quality Technologies 
The Software Hut 
Walden Books 



VIRGINIA 

B Dalton Bookseller 
B Dalton Bookseller 
B Dalton Bookseller 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 
Walden Books 



Memphis 



Austin 

Richardson 

Sherman 

Mesquite 

Dallas 

Arlington 

Ft Worth 

Waco 

Early 

Houston 

Lk Jackson 

Beaumont 

Victoria 

Laredo 

San Antonio 

Corpus Chrlstl 

Austin 

Del Rio 

Midland 

El Paso 

San Antonio 

San Marcos 

Lubbock 

Richardson 

El Paso 

Brownsville 

Houston 

Dallas 

Tyler 

Houston 

Austin 

Austin 

Waco 

San Antonio 

Denton 

Elgin 

Houston 

Houston 

Hurst 

San Antonio 

Dallas 

Dallas 

Richardson 

Beaumont 

San Antonio 

Piano 

Richardson 

Dallas 

Marshall 

Arlington 

Hurst 

Forth Worth 

Houston 

Baytown 

Friendswood 

San Antonio 

Corpus Chrlstl 

Mcallen 

Austin 

Lubbock 

Abilene 

Midland 

Odessa 

Houston 



Orem 

W Valley City 

Ogden 

Salt Lake City 

Salt Lake City 

Salt Lake City 

Salt Lake City 



Springfield 

Williamsburg 

Newport News 

Fairfax 

Mclean 

Manassas 

Springfield 

Arlington 

Alexandria 

Charlottesville 

Richmond 
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Walden Books 


Portsmoulti 


Walden Books 


Petersburg 


Walden Books 


Roanoke 


Walden Books 


Cfiesapeake 


Waiden Books 


Virginia Beach 


Walden Books 


Norfolk 


Walden Books 


Newport News 


Walden Books 


Hampton 


WASHINGTON 




Alpha Computer Center 


Richland 


B Dalton Bookseller 


Bellevue 


9 Dalton Bookseller 


Overtake 


B Dalton Bookseller 


Lynnwood 


B Dalton Bookseller 


Seattle 


B Dalton Bookseller 


Bremerton 


B Dalton Bookselter 


Tacoma 


B Dalton Bookseller 


Cliehalls 


B Dalton Bookseller 


Yakima 


Butlers Mobile TV 


Federal Way 


City News 


Bellevue 


Computer Connection 


Sllerdale 


Compuler Craft 


Ellensburg 


Computerland Ot Vancouver 


Vancouver 


Data Borne Computers 


Benton 


Elliot Bay Book Co. 


Seattle 


Kennewlck Computer Co. 


Kennewlck 


Micro West DIst, 


Belllngham 


Take A Byte 


Kennewlck 


Walden Books 


Bellevue 


Walden Books 


Lynnwood 


Walden Books 


Seattle 


Watden Books 


Everett 


Walden Books 


Tacoma 


Walden Books 


Olympla 


Walden Books 


Vancouver 


Walden Books 


Spokane 


WEST VIRQIMA 




B Dalton Bookseller 


Beckley 


Computer World 


?i^harleslon 


Computerland 


Clarksburg 


Computerland Parkersburg 


Parkersburg 


Computerland S Charleston 


S Charleston 


Computers Plus 


S Charleston 


Market Street News 


Wheeling 


Walden Books 


Bluefleld 


WISCONSIN 




B Dalton Bookseller 


Racine 


B Dalton Booksailer 


Madison 


B Dalton Bookseller 


Green Bay 


B Dalton Bookseller 


Superior 


Byls Shiop Greenfield 


Greenfield 


Ctialet Computers 


Monroe 


Magic Lantern 


Madison 


ReaQmore 


La Crosse 


Team Elect 


Eau Claire 


Walden Books 


Brooktleld 


Walden Books 


Greendale 


Walden Books 


Glendale 


Walden Books 


Milwaukee 


Walden Books 


Racine 


Walden Books 


Janesvllle 


Watden Books 


Madison 


Walden Books 


Green Bay 


Walden Books 


Eau Claire 


Walden Books 


Oahkosh 


Walden Books 


Fond Du Lac 


WYOMINQ 




Computer Concepts 


Ctxeyenne 


PUERTO RICO 




B Dalton Bookseller 


Carolina 


CANADA 




Micro West 


North Vancouver 


Micron 


Toronto, Ontario 


Mlnltronlcs 


Vancouver 


POREIQN 




Worldwide Media Service. Inc. 


New York 
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HESS FILI 

I Features: 

Names & Ratings 
Tournament & Date 
Round # & # Moves 
Opening and and and 

lYOUR GAME 

Which can be played 
automatically or 
stepped fwrd or bwrd 

Comes loadea *iih Fischers 

World CJ^arnpionsh'p Games 

Chess File on D*sk S24 ' 

HALLWAY SOFTWARE 

6625 Morrow Dr. 
Dayton. Ohio 45415 
lOhio residents add 6% sales tax. 



TRS 80 I — III 



(tontinental 
Jdventures 



fof ATARI' Compjter Ownart 

Each adventure takes up to an tiour and Is pro- 
grammed with random variables to change the 
game every time you play. 

• THE TALISMAN OF POWER 

A search through many obstacles for the Four 
Keys ot Gremlock. Will you get out alive? 
16K-S17.96 

• THE GHOST TOWER 

Find a Magical Gem in a tower haunted with 
Ores, goblins, etc. 16K-I16 96 

• GALACTIC ADVENTURE 

A space fantasy adventure in which the aliens 
have galaxlal control Your mission, as star- 
ship commander. Is to destroy their starbase. 

i6K$ig.g5. 

SATISFACTION GUARANTEED 

Send for Complete Software List 

DEALER INOUmiES INVITED 

CONTINENTAL ADVENTURES, 4875 Brookdil* 

Bloomfleld Hlllt, Ml 46013 (313) 645-2140 



Two Of The 
Best Programs 
From SoftSide 



Quest 1 An exciting journey into 
an underground maze In search of 
treasure and adventure. Armed 
only with sword and bow, you 
must rely on quick thinking to 
survive. 

Just $4.95 

Flip-It Is an excellent Implemen- 
tation of the board game 
Othello™. Match wits with a for- 
midable opponent: your computer. 

Just $4.95 



MAIL YOUR ORDER TODAY TO: 

SottSlda, 6 South Street 
Mllford, NH 0305S 



SoftSide 




ATARI SALE 





...^" 


SALE 


CENTIPEDE Rom C.irUirtgf 




34 00 


CHOPLJFTEH Diik 


'■: .- 


26 00 


FROCCER Tjpf/Dibh 


'■1 ■■^ 


zt.oo 


PREPPIE Tsps/Diik 




^^ oo 


CAhVOfJ CLIMBER Tdpt- D.ik 




?.?. 00 


RASTER BLASTER Di.-,k 




!.Z 00 


lORK l/ll/lli Dilk 


■ ■■. .^ 


30 00 


OEAOLINE Dish 




37 00 


SNOOTING ARCADE Iripp Di^K 




22 00 


APPLE PANIC T.lfP Ois^ 




22 00 


CHLSH, CPUMliLE 3, CHOMP T 


u 


2 2 DO 


PACIKIC COAST HICHWAV 1 D 




22 00 


MOUSKATTACK Diik 


J.: 1' 


2B 00 


OVER 1.300 PROGRAfvIS] 




b'J PL" Ai'i 1.' T-i'. b;i ' f 


-^!<ii'L 


,! L. ■■ 



FHEBERICE SOFTWARE SOFFLY 

P.O. BOX isaa Frederick, tuio 21701 

1301) 6625600 



€5 



a. cC 



O M 



-5 W 



ax 



I M_l -O U1 

1 ^ 1) Ji 

: n 41 lu 



1 -e > 1 

?5 = , 



O 1- 
33 - JJ 



S"a ^ h " "^ 






1-1 K 

^ ^t- '^ - 

I' 

x: ~i -I c 
^ *3 n - 



1; -c 
-M 



B 
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Monitor Dsbug Trace 

Monitor Ci'iiiuTiand Menu 
ASCII 4 Hex Display, 
Edit, Zero. & Block Move 

Debug-All monitor cmnds 
Plus Display & Edit lor 
Regisiers & Flags. Step 
& Break Point, Full Video 

Trace-All DKbug Cmnds 
P'us Dissasscmble Trace 
I Mijnii.,' %^2 Debug S18 Trace $24 

- M^'.t :.-.n<if:--.- f. Mill- 

Hallway Software 

6625 Morrow Dr, 
Dayton, Ohio 45415 



TRS80 1 — 1 



Maxell Floppy Disks 

The Mini-Disks 
with maximum quality. 




CallFREF, IKiiil; J-i-^i-;: ' 




PACIFIC EXCHANGES 

1110 ^oolhlll B.iJ 

Sd' : ' i> ■ ^ ■, ■; : 

It, t ■ ■ 




AREn 

YOU 7 

into' 

SPORIS 

~W3iK?C^cle'Ru(i^ 
Play Ratquet Spoils'' 







'24.95 



FREE LANCE INK 



riouivft AJipii II- wjTm 1 



COMPUTER DISKETTES 

y|^ COMPUTER CASSETTES, 
CASSETTE DUPLICATING SERVICE 

APPIE IBMIP C,t-*T*B1-H6*TH.0SB0RN 
COMMODORE-T nS-BO-SINC LAIR-NORTH STAO 



J25 0D 
2S00 
35 OC 
.)2 SO 



Computer Ca«settes with MAXELL Compuier 
Casseiie Tape 100% Certilied - Insianl PiayJ 
Record -Sliding Loch Out ODors 



c • 

Ct 



200 

3-29 

in 

290 

3 10 

H\3C i! OC : 



"7 50 
20 00 
SSflG 

56 00 
30 00 

;- i.iiil 



C'latrjd 



wabasH 

When It comes to 

Flexible Disks, nobody 

does it better than 

Wabash. 

MasltirCard, Visd Accepted. 
Call Free; (800) 2:^5-4137 




.bfl^i 



Send 10 Magmtic Intortnahon Sytlcms 

P O Bo« 806. <15 Howe Ave . Sheiron. CT oeaBJ 

(e03) 7J5 647? • Dealers Inquiry Welcomed 

MInlinuni Cndil Cird Ordtr SIDOO 



PACIFIC 
EXCHANGES 

liii] F,,i,ihill Bkd 

•V5Ill_rjlSl>51SpO CA 

4i4Ml ilnCal call 
HO,')! ^4J-10:i7 : 



APPLE PHYSICS 

n Disks ■ 75 Programs $203 



ThcM prrtgrims cn.->rBin<i(lcnsiVff graphics Ejicr- -J.^kc',i= 

hi> ." ir 10 programi rc4o4r.=t -!SK :Rejiior> *iih 

V I VBiioniCnphni shino 
y -^Slatic^ 51;, ,g 
) ' ^'■■- ■ *i;iKl 

!-■"' St:iXJ 

,' , ' i'.r --*! 

V " tkunilir'"" T-" ,1'. 

t v Ai.im;.' I>h,■>,c^ 51,:, ,"„ 



AiVfor Atari, IBM informoHon 



^QL *RH M: I '-r> ,^ .tfi MtnanuT nmulaliitn in whiirji 
T»>< fi^r. s<*im. hfted. eji anil inle-at: Tnv lull isL iTxijdcs 
th< ruininunilj A<|u*rmn plui 4 gurries 48k SZ* 

DIV0S4L:RS: Fi gamcv ird Ucitkh Includn D-.w -lu 
.Malchirai, Dinosiur Hangmar anc Paddle Cifapr.^- 



C ROSS IDHCATIONAI SOhTWARi- 

P (I. Bin I.^Jt 

t<»l.>li. I \7\17i) 

■|T indas riff a l-Kl-l- <aial.iu. 



<?(//■ Of THB BlUB 

The SoftSide family is 

growing. We are now 
covering the IBM Personal 
Computer and we cordially 
invite PC people 
everywhere to join the 
ranks of SoftSide con- 
tributors, If you have a 
program, a review, or just 
a story to tell, let us 
have a look at it. Send 
submissions to: 

SollSlde Publications, Inc. 

Department Z 

S South Street 

Mllford, NH 03055 



MEMOREX 

FLEXIBLE DISCS 

WE WILL NOT BE UNDER- 
SOLDfl ( Jll href (800)235-4137 

for pncKS and inforrnaTion Dealer 
tuiuines iiKTteci and C D - 
accepted 



a 




PACinc 

EXCHANGES 

HHj rtKjt,hill Bt-ii 
San Lj;s Obist^,. ( A 
4M(H In Cdi rdi' 

HlWt'j'f^-VI.'i.S ,.r 

H0-,l54Ji 1(J.^7 




Features: 

Not only holds parents, 
but will hold children, 
siblings & mate for 
any member in your tree 

Will display or print 
a direct 4 ply tree for 
any member. 
Family Tree on Disc $18 

HALLWAY SOFTWARE 

6625 Morrow Dr. 

Dayton, Otiio 45415 

Ohio residents add 6% sales tax 
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I 




Did you know 
you can get 
SoftSide on 

Disk or 
Cassette? 

See page 105. 



^^■. 



PROGRAMS 
FOR 

Sfwclal with this Ad 

TftS-80 - 

VAULTS OF CVMARRON 

(Graphic Adventure) 

RETAIL S39.gS NOW S20.00 

APPLE - VISI PAK 

t Business^ 
tETAiL sroooo Nowssso.oo 

ATARI - LISP 2.0 

iLanguags) 
)ETAILJ149.9S NOWt110.00 

VIC-20 — VIC SYNTH 

(Music Synthesiser) 

RETAIL $39.95 NOWSZO.OO 

Add S1.» S4iippln4 
cm Rm Add Sail! Tax 

OsSfS West 

4T0 Castro 11207 33560^ „ , ^ 




1 ^^P 



sdSrwARE 

STjplRES 

lafjhtl WTARI .*DO/aoo- 

^^^ I I 

We've 



Got 

Software 

Free Catalog Available 



ATARI n a rfgiilnfii Iradrmark 
o/AIAHI. l\i: 

P.O. BOX 21}i2H 
DENVER. COLORADO S022 1 

"Your Disfmmt .So/iutirr Slnrr" 

Oritcrlme: (iO^) 7?/-6so,v 



QUIT GUESSING 

Use your Al'JJLE II to become a 

iUCClSSfUl HAMDICAfftK 

Accurately project logical 
contenders with this afiiazlnf 
new rating systein 

Menu driven for easy use 

Input readily available from 
Dally Racing Form 

Complete instructions allows 
anyone to handicap like a pro 

Handlcapper on disk »24.00 

HAPQUESS DISTRIBUTING 
8540 >/0ODUND HD 
MILLERSVILLE, HD. 21108 

ftequires 48K, 1 disk 




"Iff/* 

Contact your local Hartley 
dealer or send for 
FREE catalog 
Hartley Courseware, Inc. 

Box 431 

Dimondale. Ml 48821 
616-942-8987 



Co. 



USES TI-99/4A EXTENDED BASIC 

Wav« your Wand 
^^Krife* Magical Iw 

Two Programs lor creating 
syrn&ofca, ((§ures, creatures, 
shapes 
rnake Li6ianas of Sprites 
uses Simple joystrcK 
and oRfl key commands 




Steven M. Ruhl 



"" tntormalion Only SZOO 

9oIh Programs Only $35,95 
Send Oiders To 

P O Box 9Qi22 Tacoma. WA 98498 
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Advertiser's Index 



Access Unlimited 128 

Amdek Corp 1 25 

Archive Inc 13 

Arlington Software Systems 7 

Arma Design 29 

ASAP Computer Products, Inc 9 

ASC 63 

Automated Simulations 1 26 

BRAM 47 

Bvte Writer 46 

C & C Software 34 

Collins Computing 37 

Components Express, Inc 86 

Computer Shopper 96 

Computer Showca.se Exposition 21 

Continental Adventures 122 

Crabbc Associates 16 

Cross Educational Software 123 

Decision Support Software 60 

Diversified Software Research, Inc 91 

Don't Ask Cover 11, 30 

EdCom 39 

Educational Activities, Inc 98 

Electronics Specialists 115 

Franklin Computer Corp 84 

Free Lance Ink 123 

Frederick Software 1 22 

Hallway Software 123 

Hartley Courseware 124 

Heartland 44 

High Country Micro Systems 61 

J V Software 83 

Kelly's Computing 25 

Langley Si. Clair Ill 

Last Electronics 92 

Learning Tools, Inc 10 

Lyeo Computer 55 

Magnetic Information Systems 16, 123 

Marquess Distributing 1 24 

Mesa Research 20 

Micro 6502 66 

Micro Images 99 

MMC Software 17, 67 

Mytois Enterprises 71 

New Classics Software 115 
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STSC II 

Synapse Software Cover IV 

The Computer Book Club 18 

The Variable 34 

The Wish Company 124 

Village Software 108 

Vista Computer Co 4 

Visual Horizons 98 
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The Adventure of the Month 87 

Best of SoftSide 48 
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DV & CV 105 

Moving Ad 92 

Sell Your Programs 102 

Translation Contest 12 

Advertising Representiilives 

Sue Rowland, Bob Mackintosh (603) 673-0585 
National Representative 

Christopher Smith, Inter-Marketing Associates 
(603) 827-3976 
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Compa'tible 

color 
monitors 





. . . for demanding grapliics 
or text display. 



For high resolution (560H X 240V) color graphics, you can't 
beat the Amdek Color-ll ISAonitor. And if you're looking for 
economy, the Color-ill Monitor with 260H X 300V 
resolution is a superb buy. 

Both monitors feature RGB video input (or computer control- 
led color . . and Amdek 's easy-to-install Digital Video Multi- 
plexor (DVM) board permits interface with the most popular 
80 column boards. 
Just call, or write for full details. 



Color-ll rwlonitor has RGB input and 560(H) X 240(V) 

line resolution. 

Color-Ill Monitor has RGB input and 260(H) X 300(V) 

line Resolution. 

Digital Video Multiplexor (DVM) assures color graphics 

interface with most popular 80 column boards, such as: 

Videx "Videoterm". Advanced Logic "Smart-term", 

MSlB "SUP "R' TERMINAL", Bit-3 Computer Corporation 

"FULL VIEW-80". and the "Doubtevision " boards. 



2201 Lively Blvd. • ElkGrove Village, IL 60007 
(312)364-1180 TLX: 25-4786 
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Amdek 



your guide to innovative computing! 
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SUDDENLY you awaken in a coffin 

surrounded by a vast gravi^ai:^. 

YOU MUST GET OUT BEPORj^^WN! 

HOW? There's no easy way, t 

walls are too high — ^the gates 

locked. Vampires, Zombies, and 

Werewolves constantly attack as 

you frantically search musty I W^'^^^' 

crypts, catacombs, and dead - ' 
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ONLY TWELVE HOURS TO 
ESCAPE OR REMAIN FOREVER! 

CRYPT OF THE UNDEAD, designed by Marc Benioff . 
Offers... 

• Both Puzzle-Solving &. Role-Playing Intrigue ! 

• Superb Graphics, Sound & Color Animation! 

• Hours of Challenging Terror! ^* 
Requires . , . ' /, -, 

• ATARI 4001800 & One Disk Drive 

• One Player & Joystick Controller 
Comes with . . . 

• Game Progrcun &, Complete Instructions 

• EPYX30/F0REVER WARRANTY 

Now Available At Your Favorite Dealer ... $29.95 

For the name of your nearest EFVX dealer write : 

"CRYPT OF THE UNDEAD" 

EPYX^utomated Simulations. Inc. 

P.O. Box 4247, Mountain View, CA 94040 



COMPUTIER GAMeS 
TH/NKERS PLAY 



EPYX Temple of Apshal was the very first computer 
game ever to win the Hobby Industry award for 
excellence. EPYX pledges you that same excellence 
in every game you purchase from us ... the VERY 
BEST in entertainmentl 

EPYX 30/FOREVER WARRANTY 
•Our 30-day Uncoaditional Guarantee: If your 
EPYX Game has any defect whatsoever within 
30 days of purchase, return it to us or your 
dealer and we will replace it free. 
'Our Forever Warranty: If anything happens 
to your disk at any time after 30 days, for 
any reason. Just send it back with $5.00 for 
shipping, and we will send you a replacement. 



MTAJtr 400/800 Is a trademark o/ATARf . /JVC . 
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SOFTWARE 
STORES 

for the ATARI 400/800* 



ARE GROWING! 

Another Location . . . More Manufacturers 

WE CARRY SOFTWARE FROM: 

HCMS ON-LINE UK 

IN-HOME SIRIOUS ROKLAN 

ENGLISH BRODERBUND LONDON 

DATASOFT 

SPECIALS OF THE MONTH 

(While quanties last) 

GORF AND WIZARD OF WOR 

(by Roklan) 

Disk -$29.95 Cartridge - $34.95 



Free Catalog Available 

WRITE: 

P.O. BOX 21 828 
DENVER, CO 80221 

P.O.BOX 21447 
DENVER.CO 80221 

32 00 Shipping and Handling, All orders sen! C.0.0. unless other arrange- 
nents are made. Additional SI. 50 for Blue Label. One Day Service 

Visa and Master Card Accepted 



CALL: 

#1 (303) 431-6598 
(NEW STORE) 
#2 (303) 426-5329 



LIMBER UP YOUR COUNTING FINGERS! 

SoftSide 31 will have as its focus: 

Personal Finance 

Few of us are capable 
of understanding the 
complex workings of ac- 
counting systems. At the 
same time, our personal 
financial matters would 
be much better under 
control if we could only 
manage our lives like a 
small business. 

The next issue of SoftSide will offer some easy- 
to-understand solutions to this problem. 

We'll have a Front Runner to help you keep 
track of where your money is going and reviews of 
some of the dynamic new personal financial 
management packages on the market. We'll even 
teach you how to use your word processor more ef- 
fectively to let those creditors who've messed up 
your last three bills know about it. 

Start polishing your green plastic visor — it's 
time to get your money matters under control! 





WELL.' Vou MUST WMB 

REmiESRATEP VOU?^ 
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Bl6 PEAL. Hg WAS 
PART OF VOUR OOJK 
AtlHD- ^00 OKRE TALK- 

iN6-ro VOURSEUF 




so 60HAT? 9^00 
TALK TO 

MhcHims! 
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SoftSide 




ANNOUNCING THE NEW 

ACCESS UNLIMITED 

MICRO SHOPPING CENTER 



OVER $150,000 rN NEW GAMES & BUSINESS SOFTWARE 

WE SUPPORT "Tl", "ATARI", "COMMODORE", "IBM", 

"APPLE", "PERCOM", "WANG", "IBEX", "TRS-80", 

"EPSON", "OSBORNE"! 

MANUFACTURER OVER-PRODUCTION 

LESS THAN DISTRIBUTOR COST-BEST BUYS IN U.S. 
"IBEX" 64K Business System/Word Processor 
Moiiel2200 

► Hi Resolution 9" Green Phosphor Screen. 

► 2 Ea. 80KB Floppy Drives, Includes CP/M* Operating System Basic 

► Basic Interpreter and "C'lTOH" Letter Quality Full Size Daisywheel Printer 

YOU SAVE $3408.00 — Reg. Retail $6621.00~Sale Price: $2960.00 

"IBEX" SYSTEM as above w(/Billing Quality Printer instead— 
Sale: $1938.00. 

Model 7202 Reg. Price $9070 Now Only $3995. 

Once in a ilfetime. 64K Ram IBEX 

12" Green Phosphor Screen with 2 8" Floppy Disk Drives 

2.4 Megabyte Storage 

Lool( wliat you get for $3995 



•Z80 

■ CP/M compatible 

■ 64 kilobyte RAM, expandable to 
192 kilobytes 

• Dual 8" floppies (1.2 megabytes 
each) sw/itchable to IBM format 

■ 12" green phosphor monitor 
(80 X 24 characters) 



• Centronics compatible printer 
interface 

• Serial interface 

• Full function keyboard 

• Clock timer and calendar {m\h 
battery) 



NEW! 5V4" SOFT SECTOR DISKEHES W/Hub Ring 



"BASF" SVi" Lifetime Limited Vterranty $24.M SSDD Box of 10 



ATHANA 1 Yr. Limited Vterranty $19.90 SSSD Box of 10 



8" Diskettes From $22.75 

OTHER DISKETTES AT EQUAL SAVINGS 

Flip 'N File Boxes— Holds 50 Diskettes 
5%" Reg. $34.95 Sale $19.95 

8" Reg. $49.95 Sale $28.95 

LIBRARY CASES— Holds 10 Diskettes. Sale $2.95 ea. 

"IBM PC" COMPUTERS IN STOCK 

Bare Drives (without Controller) For "IBM PC" 

—Internal or External— $269.95 ea. 



OVER $1,000,000 IN NEW COMPUTERS, 

PERIPHERALS AND SUPPLIES! 

NEW PRINTERS IN STOCK: "CENTRONICS", "C'lTOH", 

"OKIDATA", "STAR", "TALLY", "RICOH", 

"SMITH-CORONA TP", "EPSON". 

VALUES TO $3500.00 

SALE: $345 to $1995 

Call for pricing and fast delivery on other hard-to-get micro peripherals 
and software. 1-800/527-3475 

Top 100 Software programs normally maintained in stock and sold at our 
special Access Unlimited Micro Shopping Center prices. 

" "Reg. Trademarks 

D Please send me a FREE catalog. I'm not ready to order at this time. 
D YES, I'm taking advantage of your Sales prices. 

Name 

Company Name 

Address 

City 



-State.. 



.Zip. 



Phone Number i 
Quantity 



Item 



Unit Price 



Subtotal 



































Subtotal 




State Sales Tax (Texas residents only) 




handling charge 




Check one; Total 





D payment enclosed D Visa D MasterCard* 



*lf MasterCard, numbers above name; 
Expiration Date; 



■Authorized signature, if charged 



ACCESS UNLIMITED 



DEPT D1/401 N. Central Expwy. #600/Richardson, Texas 75080 

Tel. 1-800/527-3475 214/340-5366 
214/690-0207 Sat and Evenings Only 



Explore the Frontiers of Intelligence 



THE MtND OF MAN 

Chess, Cneckets, and Odin (as played by U.S^ 
Othello Associotion rules) are classic games of 
ttie intellect. They evolved overltiecenluries as 
way to understond complex situations and 
octiieve mastery In action 

Now, by interacting witti ttie intelligence 
embodied In these programs, you can 
participate in the exciting challenge of the 
Mind of Man. 



FOR AU. GENERATIONS- 

ANEWGENERATtONOF 
INTERACTIVE INTELLIGENCE 

Chess. Checkers, and Odin ore unique— in 
playing strength ond in vi/hot ttiey let you do. 
You can try out any idea— and even get ideas 
from ttie programs ttiemselves. Plus, it is easy 
and fun to play ttie games and use their many 
fsoturBS: 

• Different levels of play, from beginner to 
expert • Ad vice on best move • Take bock and 
replay moves • Auto and manual modes • 
Instont reploy of games • "Chonge" feature 
odds or subtracts pieces • Sophisticated 
opening libraries • Clear graphics • 
Instructions Include chapter on skillful ploy. 



THE PEOPLE BEHIND THE PROGRAMS- 
LARRY ATKIN AND DAVID SUTE 

Authors of the Norttiwestern University Al 
Computer Chess program. Winners of the 
World Computer Chess Tournament, 
T977.1 980; Winners of 8 North American 
Computer Chess Championships between 
1970 and 1979; Two of the world's authorities 
on mochine intelligence 

PETER PREY 

Professor of Northwestern University, teaching 
courses in Psychology and Computer Science. 
Edifw of and contributor to the definitive text on 
computer chess: Chess Skill in Man and 
Machine. One of the U.S. Othello Association's 
top-ranked players. 
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CHALLENGES THE PROFICIENT; 
INSTRUCTS THE BEGINNER. 

A new microcomputer standard for what many 
consider to be the ulli mate gome of the i ntellect. 
In addition to its superior playing strength, 
Chess from Odesto introduces a new 
generation of inleroclive intelligence-with 27 
cursor-controlled features, including; 

Advice and prediction of best moves • Save 
gomes to disk^Grophic Illustration of attacks 
and defenses • Variations of bli nd-fold chess • 
17 levels of play, including posfol and. 
mote-finder modes • Enactment of over 30 
classic human and computer chess gomes • 
Plus-on opening library of over 7000 moves 

Fa those who wont the best. 



YOU'VE NEVER KNOWN CHECKERS 
LIKE THIS! 

Learn the complexities of this surprisingly 
sophisticated strofegy game by interacting with 
Checkers' 24 user features: 

• Ploy against 16 levels of difficulty • Wbtch 
Checkers ploy against itse!f-one level against 
onofher* Switch to "Give-oway' mode, where 
the object is to moke your opponent take your 
pieces • Wotch the Checkers movie-on 
instant replay of a whole gome • For those 
Interested in ttie inner-wakings of "programs 
that think', adjust 58 program parameters, so 
ttiof you can experiment witti the woy 
Checkers itself thinks, and how it ploys 

An ideal introduction to artificial intelligence 



VWY ARE 20 MILLION PEOPLE PLAYING 
THIS GAME? 

A classic boord gome, where the object is to 
entrap your opponent's pieces-but only at the 
right time The rules o( play are simple ond the 
game fast. Al your disposal ore the full range of 
feotures lound in oil of Odesto s Mind of Man 
series. You will need them, along with your 
keenest insight and deepest perception, to 
master the secret of Odin (playing by US 
Othello Association rules) Join ttiegrowing 
number of strategists expkxing the subtleties of 
a game that may change the way you tnink. 



930 Pitner Checl(ers: S4£ 

Evonston, IL 60202 Odin: S49.95 
(U.S. A.) 



Ctiess: S69.95 See your local software dealer, or order For Apple II. Apple II Plus 48K disk 

Checkers: $49.95 (Mastercard or Visa): systems, and Atori 48K disii systems. 

Odin: S49. 95 800-323-5423 Odin is also aval lable tor TRS-80 Irtodel 

(In Illinois, call 31 2-328-71 01 ) 1 & 3 32 K disk systems. 
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Why let some good times 
slip through your fingers? 



Comer the latest Synapse Software 
games at your local computer store. 




Atari is a registered trade 
VIC 64 is a registered 
IBM-PC Is a resist 
Ti 99/4 Is a reglstei 
All same titles 
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